(gnus-point-at-eol, gnus-point-at-bol): Use
authorDave Love <fx@gnu.org>
Tue, 4 Jul 2000 14:58:31 +0000 (14:58 +0000)
committerDave Love <fx@gnu.org>
Tue, 4 Jul 2000 14:58:31 +0000 (14:58 +0000)
defalias, not fset.

lisp/gnus-util.el

index dbe3ac7..6a67152 100644 (file)
      (when (gnus-buffer-exists-p buf)
        (kill-buffer buf))))
 
-(fset 'gnus-point-at-bol
-      (if (fboundp 'point-at-bol)
-         'point-at-bol
-       'line-beginning-position))
-
-(fset 'gnus-point-at-eol
-      (if (fboundp 'point-at-eol)
-         'point-at-eol
-       'line-end-position))
+(defalias 'gnus-point-at-bol
+  (if (fboundp 'point-at-bol)
+      'point-at-bol
+    'line-beginning-position))
+
+(defalias 'gnus-point-at-eol
+  (if (fboundp 'point-at-eol)
+      'point-at-eol
+    'line-end-position))
 
 (defun gnus-delete-first (elt list)
   "Delete by side effect the first occurrence of ELT as a member of LIST."