[bongo-patches] Don't call `defalias' with three arguments on Emacs 21

[Daniel Brockman]

Wed Dec 27 11:46:21 CET 2006  Daniel Brockman <address@hidden>

 * Don't call `defalias' with three arguments on Emacs 21.

diff -rN -u old-bongo/bongo.el new-bongo/bongo.el
--- old-bongo/bongo.el  2006-12-29 11:13:51.000000000 +0100
+++ new-bongo/bongo.el  2006-12-29 11:13:51.000000000 +0100
@@ -1840,8 +1840,8 @@
 See also `bongo-point-at-next-object-line'."
   (null (bongo-point-at-next-object-line point)))
 
-(defalias 'bongo-point-before-line 'bongo-point-at-bol
-  "Return the first character position of the line at POINT.")
+(defalias 'bongo-point-before-line
+  'bongo-point-at-bol)
 
 (defun bongo-point-after-line (&optional point)
   "Return the first character position after the line at POINT.
diff -rN -u old-bongo/bongo-emacs21.el new-bongo/bongo-emacs21.el
--- old-bongo/bongo-emacs21.el  2006-12-29 11:13:51.000000000 +0100
+++ new-bongo/bongo-emacs21.el  2006-12-29 11:13:51.000000000 +0100
@@ -46,10 +46,12 @@
 (defmacro bongo-define-obsolete-function-alias
   (obsolete-name current-name &optional when docstring)
   "Make OBSOLETE-NAME an obsolete function alias for CURRENT-NAME.
-This just calls `defalias' and `make-obsolete'."
+This just calls `defalias' and `make-obsolete'.
+DOCSTRING is ignored, because `defalias' does not accept the
+corresponding argument in Emacs 21."
   (declare (doc-string 4))
   `(progn
-     (defalias ,obsolete-name ,current-name ,docstring)
+     (defalias ,obsolete-name ,current-name)
      (make-obsolete ,obsolete-name ,current-name ,when)))
 
 (defmacro bongo-define-obsolete-variable-alias

-- 
Daniel Brockman <address@hidden>