Mercurial > emacs

comparison lisp/info.el @ 92536:38f425cf30bc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Info-bookmark-make-cell): Fix up last change.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 06 Mar 2008 21:43:06 +0000
parents 46c4774d31c9
children 4170d4a36502
comparison
equal deleted inserted replaced
92535:46c4774d31c9 92536:38f425cf30bc
4324 (defvar bookmark-search-size) 4324 (defvar bookmark-search-size)
4325 4325
4326 ;; This is only called from bookmark.el. 4326 ;; This is only called from bookmark.el.
4327 (declare-function bookmark-buffer-file-name "bookmark" ()) 4327 (declare-function bookmark-buffer-file-name "bookmark" ())
4328 4328
4329 (defun Info-bookmark-make-cell (annotation &optional info-node) 4329 (defun Info-bookmark-make-cell (annotation &rest args)
4330 (let ((the-record 4330 (let ((the-record
4331 `((filename . ,(bookmark-buffer-file-name)) 4331 `((filename . ,(bookmark-buffer-file-name))
4332 (front-context-string 4332 (front-context-string
4333 . ,(if (>= (- (point-max) (point)) bookmark-search-size) 4333 . ,(if (>= (- (point-max) (point)) bookmark-search-size)
4334 (buffer-substring-no-properties 4334 (buffer-substring-no-properties