From c88f24decffd712a0f0413c004a626625b3d9343 Mon Sep 17 00:00:00 2001 From: Joost Kremers Date: Sat, 20 Oct 2007 21:23:51 +0200 Subject: [PATCH] variable bibfiles removed from ebib-get-local-databases (ebib-get-local-databases): variable bibfiles removed from the let, as it wasn't actually used in the function. --- src/ChangeLog | 1 + src/ebib.el | 6 ++---- 2 files changed, 3 insertions(+), 4 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index e45dbf9..6cee599 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -10,6 +10,7 @@ (ebib-get-field-highlighted): modified so that it doesn't produce an error if an entry contains a crossref to an entry that does not exist. + (ebib-get-local-databases): variable bibfiles removed from the let. 2007-10-20 Joost Kremers diff --git a/src/ebib.el b/src/ebib.el index 984f598..91733e3 100644 --- a/src/ebib.el +++ b/src/ebib.el @@ -2049,7 +2049,6 @@ a filename is asked to which the entry is appended." ((default) (beep)))) - (defun ebib-search () "Search the current Ebib database. @@ -3027,7 +3026,7 @@ which the string is appended." (let ((num (ebib-prefix prefix))) (if num (ebib-export-to-db num (format "@STRING definition `%s' copied to database %%d" ebib-current-string) - 3'(lambda (db) + #'(lambda (db) (let ((abbr ebib-current-string) (string (gethash ebib-current-string (edb-strings ebib-cur-db)))) (if (member abbr (edb-strings-list db)) @@ -3273,8 +3272,7 @@ master file for a \\bibliography command and returns the file(s) given in its argument. If no \\bibliography command is found, returns the symbol NONE." (let ((texfile-buffer (current-buffer)) - texfile - bibfiles) + texfile) ;; if AucTeX's TeX-master is used and set to a string, we must ;; search that file for a \bibliography command, as it's more ;; likely to be in there than in the file we're in. -- 2.11.4.GIT