emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/progmodes/etags.el,v


From: Dan Nicolaescu
Subject: [Emacs-diffs] Changes to emacs/lisp/progmodes/etags.el,v
Date: Fri, 19 Oct 2007 18:41:11 +0000

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Dan Nicolaescu <dann>   07/10/19 18:41:10

Index: progmodes/etags.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/progmodes/etags.el,v
retrieving revision 1.197
retrieving revision 1.198
diff -u -b -r1.197 -r1.198
--- progmodes/etags.el  14 Oct 2007 02:51:58 -0000      1.197
+++ progmodes/etags.el  19 Oct 2007 18:41:09 -0000      1.198
@@ -1130,7 +1130,7 @@
                  (if (memq (car order) '(tag-exact-file-name-match-p
                                          tag-file-name-match-p
                                          tag-partial-file-name-match-p))
-                      (save-excursion (next-line 1)
+                      (save-excursion (forward-line 1)
                                       (file-of-tag))
                     (file-of-tag)))
            tag-info (funcall snarf-tag-function))
@@ -1454,10 +1454,10 @@
             (tag-info (save-excursion (funcall snarf-tag-function)))
             (tag (if (eq t (car tag-info)) nil (car tag-info)))
             (file-path (save-excursion (if tag (file-of-tag)
-                                         (save-excursion (next-line 1)
+                                         (save-excursion (forward-line 1)
                                                          (file-of-tag)))))
             (file-label (if tag (file-of-tag t)
-                          (save-excursion (next-line 1)
+                          (save-excursion (forward-line 1)
                                           (file-of-tag t))))
             (pt (with-current-buffer standard-output (point))))
        (if tag
@@ -1884,7 +1884,7 @@
          (funcall tags-apropos-function regexp))))
     (etags-tags-apropos-additional regexp))
   (with-current-buffer "*Tags List*"
-    (require 'apropos)
+    (eval-and-compile (require 'apropos))
     (apropos-mode)
     ;; apropos-mode is derived from fundamental-mode and it kills
     ;; all local variables.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]