From: Juanma Barranquero <lekktu@gmail.com>
Date: Sat, 8 Mar 2008 00:11:29 +0000 (+0000)
Subject: (bookmark-make-name-function, bookmark-get-bookmark-record):
X-Git-Tag: emacs-pretest-23.0.90~7395
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f9b27c85997c48ac9844081c347e6924de91452b;p=emacs.git

(bookmark-make-name-function, bookmark-get-bookmark-record):
Pacify byte-compiler.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9d267a7d863..f9840850268 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-03-08  Juanma Barranquero  <lekktu@gmail.com>
+
+	* info.el (bookmark-make-name-function, bookmark-get-bookmark-record):
+	Pacify byte-compiler.
+
 2008-03-07  Alan Mackenzie  <acm@muc.de>
 
 	* progmodes/cc-engine.el (c-in-knr-argdecl): Limit number of
diff --git a/lisp/info.el b/lisp/info.el
index 5f074b686d6..c6834408bac 100644
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -3375,6 +3375,8 @@ With a zero prefix arg, put the name inside a function call to `info'."
 
 (defvar tool-bar-map)
 (defvar bookmark-make-record-function)
+(defvar bookmark-make-name-function)
+(declare-function bookmark-get-bookmark-record "bookmark" (bookmark))
 
 ;; Autoload cookie needed by desktop.el
 ;;;###autoload
@@ -3745,7 +3747,7 @@ the variable `Info-file-list-for-emacs'."
            (case-fold-search t)
            paragraph-markers
            (not-fontified-p ; the node hasn't already been fontified
-            (not (let ((where (next-single-property-change (point-min) 
+            (not (let ((where (next-single-property-change (point-min)
 							   'font-lock-face)))
                    (and where (not (= where (point-max)))))))
            (fontify-visited-p ; visited nodes need to be re-fontified