diff --git a/ChangeLog b/ChangeLog
index e3aa4445dd..0d972f15ca 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2005-12-29  David Hampton  <hampton@employees.org>
+
+	* src/engine/gw-engine-spec.scm: Comment out unused function that
+	won't compile with g-wrap 1.9 after the const-ifying of the
+	account functions.
+
 2005-12-29  Christian Stimming  <stimming@tuhh.de>
 
 	* src/import-export/hbci/gnc-hbci-utils.h, gnc-hbci-utils.c: Use
diff --git a/src/engine/gw-engine-spec.scm b/src/engine/gw-engine-spec.scm
index 731c33cd27..6100b23f19 100644
--- a/src/engine/gw-engine-spec.scm
+++ b/src/engine/gw-engine-spec.scm
@@ -740,20 +740,20 @@ to the other splits in account a.")
  "Check to see if all of the splits in transaction t are in proper
 date order.")
 
-(gw:wrap-function
- ws
- 'gnc:account-order
- '<gw:int>
- "xaccAccountOrder"
- '(
-   ((<gnc:Account**> const) a1)
-   ((<gnc:Account**> const) a2)
-   )
- "Defines a sorting order on accounts.  Returns -1 if a1 is \"less
-than\" the second, +1 if the a1 is \"greater than\" the second, and 0
-if they are equal.  To determine the sort order, the account codes are
-compared, and if these are equal, then account types, and, if these
-are equal, then account names.")
+;; (gw:wrap-function
+;;  ws
+;;  'gnc:account-order
+;;  '<gw:int>
+;;  "xaccAccountOrder_gwrap"
+;;  '(
+;;    (<gnc:Account**> a1)
+;;    (<gnc:Account**> a2)
+;;    )
+;;  "Defines a sorting order on accounts.  Returns -1 if a1 is \"less
+;; than\" the second, +1 if the a1 is \"greater than\" the second, and 0
+;; if they are equal.  To determine the sort order, the account codes are
+;; compared, and if these are equal, then account types, and, if these
+;; are equal, then account names.")
 
 (gw:wrap-function
  ws