diff lisp/vm/vm-summary.el @ 146:2af401a6ecca r20-2p1

Import from CVS: tag r20-2p1
author cvs
date Mon, 13 Aug 2007 09:34:46 +0200
parents cca96a509cfe
children 43dd3413c7c7
line wrap: on
line diff
--- a/lisp/vm/vm-summary.el	Mon Aug 13 09:34:16 2007 +0200
+++ b/lisp/vm/vm-summary.el	Mon Aug 13 09:34:46 2007 +0200
@@ -32,8 +32,7 @@
 	truncate-lines t)
   ;; horizontal scrollbar off by default
   ;; user can turn it on in summary hook if desired.
-  (and (fboundp 'set-specifier)
-       scrollbar-height
+  (and vm-xemacs-p (featurep 'scrollbar)
        (set-specifier scrollbar-height (cons (current-buffer) 0)))
   (use-local-map vm-summary-mode-map)
   (and (vm-menu-support-possible-p)