mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

(refer-find-entry-internal): Remove extra

Browse source 
format string arguments.
This commit is contained in:
Andreas Schwab 2004-02-08 22:30:29 +00:00
parent 8684f2f517
commit 478a1803bc
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/textmodes/refer.el
View file

@ -1,6 +1,6 @@
;;; refer.el --- look up references in bibliography files
;; Copyright (C) 1992, 1996, 2001 Free Software Foundation, Inc.
;; Copyright (C) 1992, 1996, 2001, 2004 Free Software Foundation, Inc.
;; Author: Ashwin Ram <ashwin@cc.gatech.edu>
;; Maintainer: Gernot Heiser <gernot@acm.org>
@ -226,10 +226,12 @@ found on the last refer-find-entry or refer-find-next-entry."
(throw 'found (find-file file)))
(setq refer-saved-pos nil
files (cdr files)))
(progn (message "Scanning %s... No such file" (car files) (ding))
(progn (ding)
(message "Scanning %s... No such file" (car files))
(sit-for 1)
(setq files (cdr files))))))
(message "Keywords \"%s\" not found in any \.bib file" keywords (ding)))
(ding)
(message "Keywords \"%s\" not found in any \.bib file" keywords))
(select-window old-window)))
(defun refer-find-entry-in-file (keywords-list file &optional old-pos)