diff lisp/vm/vm-summary.el @ 155:43dd3413c7c7 r20-3b4

Import from CVS: tag r20-3b4
author cvs
date Mon, 13 Aug 2007 09:39:39 +0200
parents 2af401a6ecca
children
line wrap: on
line diff
--- a/lisp/vm/vm-summary.el	Mon Aug 13 09:38:27 2007 +0200
+++ b/lisp/vm/vm-summary.el	Mon Aug 13 09:39:39 2007 +0200
@@ -41,7 +41,7 @@
        (vm-mouse-support-possible-p)
        (vm-mouse-xemacs-mouse-p)
        (add-hook 'mode-motion-hook 'mode-motion-highlight-line))
-  (if (or vm-frame-per-folder vm-frame-per-summary)
+  (if (and vm-mutable-frames (or vm-frame-per-folder vm-frame-per-summary))
       (vm-set-hooks-for-frame-deletion))
   (run-hooks 'vm-summary-mode-hook)
   ;; Lucid Emacs apparently used this name