lisp/recentf.el

[Lute Kamstra]

Does someone see a problem with this change?

Lute.


2005-06-13  Lute Kamstra  <address@hidden>

        * recentf.el (recentf-dialog-mode): Use kill-all-local-variables
        and run-mode-hooks.
        (recentf-edit-list, recentf-open-files): Don't call
        kill-all-local-variables directly.


Index: lisp/recentf.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/recentf.el,v
retrieving revision 1.37
diff -c -r1.37 recentf.el
*** lisp/recentf.el     31 May 2005 04:19:10 -0000      1.37
--- lisp/recentf.el     13 Jun 2005 12:09:26 -0000
***************
*** 923,931 ****
  
  \\{recentf-dialog-mode-map}"
    (interactive)
    (setq major-mode 'recentf-dialog-mode)
    (setq mode-name "recentf-dialog")
!   (use-local-map recentf-dialog-mode-map))
  
  ;;; Hooks
  ;;
--- 923,933 ----
  
  \\{recentf-dialog-mode-map}"
    (interactive)
+   (kill-all-local-variables)
    (setq major-mode 'recentf-dialog-mode)
    (setq mode-name "recentf-dialog")
!   (use-local-map recentf-dialog-mode-map)
!   (run-mode-hooks 'recentf-dialog-mode-hook))
  
  ;;; Hooks
  ;;
***************
*** 1002,1008 ****
        (get-buffer-create (format "*%s - Edit list*" recentf-menu-title))
      (switch-to-buffer (current-buffer))
      ;; Cleanup buffer
-     (kill-all-local-variables)
      (let ((inhibit-read-only t)
            (ol (overlay-lists)))
        (erase-buffer)
--- 1004,1009 ----
***************
*** 1101,1107 ****
    (with-current-buffer (get-buffer-create buffer-name)
      (switch-to-buffer (current-buffer))
      ;; Cleanup buffer
-     (kill-all-local-variables)
      (let ((inhibit-read-only t)
            (ol (overlay-lists)))
        (erase-buffer)
--- 1102,1107 ----