comparison lisp/minibuf.el @ 4222:38ef5a6da799

[xemacs-hg @ 2007-10-13 14:08:26 by aidan] Fix the nomule package build; eliminate some non-X compile time warnings.
author aidan
date Sat, 13 Oct 2007 14:08:30 +0000
parents 5df5ea55d3fc
children 53e507d77416
comparison
equal deleted inserted replaced
4221:807c86a7612a 4222:38ef5a6da799
2093 ;; (?? I wrote this comment above some time ago, 2093 ;; (?? I wrote this comment above some time ago,
2094 ;; and I don't understand what I'm referring to 2094 ;; and I don't understand what I'm referring to
2095 ;; any more. --ben 2095 ;; any more. --ben
2096 (lambda () 2096 (lambda ()
2097 (mouse-rfn-setup-vars prompt) 2097 (mouse-rfn-setup-vars prompt)
2098 (when (featurep 'scrollbar) 2098 (when-boundp #'scrollbar-width
2099 (set-specifier scrollbar-width 0 (current-buffer))) 2099 (set-specifier scrollbar-width 0 (current-buffer)))
2100 (setq truncate-lines t)))) 2100 (setq truncate-lines t))))
2101 2101
2102 (set-buffer filebuf) 2102 (set-buffer filebuf)
2103 (add-local-hook 'completion-setup-hook rfcshookfun) 2103 (add-local-hook 'completion-setup-hook rfcshookfun)