emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Karl Fogel
Subject: [Emacs-diffs] Changes to emacs/lisp/doc-view.el,v
Date: Fri, 07 Mar 2008 05:44:39 +0000

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Karl Fogel <kfogel>     08/03/07 05:44:38

Index: doc-view.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/doc-view.el,v
retrieving revision 1.48
retrieving revision 1.49
diff -u -b -r1.48 -r1.49
--- doc-view.el 26 Feb 2008 02:06:32 -0000      1.48
+++ doc-view.el 7 Mar 2008 05:44:34 -0000       1.49
@@ -969,7 +969,7 @@
              (file-name-extension doc-view-buffer-file-name)" files is 
missing.  "
              "Type \\[doc-view-toggle-display] to switch to an editing 
mode.")))))
 
-(defvar bookmark-make-cell-function)
+(defvar bookmark-make-record-function)
 
 (defun doc-view-clone-buffer-hook ()
   ;; FIXME: There are several potential problems linked with reconversion
@@ -1046,8 +1046,8 @@
   (set (make-local-variable 'cursor-type) nil)
   (use-local-map doc-view-mode-map)
   (set (make-local-variable 'after-revert-hook) 'doc-view-reconvert-doc)
-  (set (make-local-variable 'bookmark-make-cell-function)
-       'doc-view-bookmark-make-cell)
+  (set (make-local-variable 'bookmark-make-record-function)
+       'doc-view-bookmark-make-record)
   (setq mode-name "DocView"
        buffer-read-only t
        major-mode 'doc-view-mode)
@@ -1082,7 +1082,7 @@
 
 ;;;; Bookmark integration
 
-(defun doc-view-bookmark-make-cell (annotation &rest args)
+(defun doc-view-bookmark-make-record (annotation &rest args)
   (let ((the-record
          `((filename . ,buffer-file-name)
            (page     . ,(doc-view-current-page))
@@ -1104,7 +1104,7 @@
 ;;;###autoload
 (defun doc-view-bookmark-jump (bmk)
   ;; This implements the `handler' function interface for record type
-  ;; returned by `bookmark-make-cell-function', which see.
+  ;; returned by `doc-view-bookmark-make-record', which see.
   (save-window-excursion
     (let ((filename (bookmark-get-filename bmk))
          (page (cdr (assq 'page (bookmark-get-bookmark-record bmk)))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]