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

[Mathias Dahl]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Mathias Dahl <mathiasdahl>      06/07/16 08:09:39

Index: tumme.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/tumme.el,v
retrieving revision 1.30
retrieving revision 1.31
diff -u -b -r1.30 -r1.31
--- tumme.el    12 Jul 2006 00:24:40 -0000      1.30
+++ tumme.el    16 Jul 2006 08:09:39 -0000      1.31
@@ -2085,11 +2085,11 @@
 (defun tumme-get-comment (file)
   "Get comment for file FILE."
   (save-excursion
-    (let (end buf comment-beg comment (base-name (file-name-nondirectory 
file)))
+    (let (end buf comment-beg comment)
       (setq buf (find-file tumme-db-file))
       (goto-char (point-min))
       (when (search-forward-regexp
-             (format "^%s" base-name) nil t)
+             (format "^%s" file) nil t)
         (end-of-line)
         (setq end (point))
         (beginning-of-line)