Mercurial > hg > xemacs-beta
diff lisp/menubar-items.el @ 510:5bdbc721d46a
[xemacs-hg @ 2001-05-06 08:33:35 by ben]
implement printing the selection when it's selected.
force redisplay when set-charset-ccl-program called.
if bytecomp or byte-optimize need recompiling, then load
the .el version of them first, recompile them, and reload
the .elc versions to recompile everything else (so we won't
be waiting until the cows come home).
| author | ben |
|---|---|
| date | Sun, 06 May 2001 08:33:41 +0000 |
| parents | 39ccc7dd8077 |
| children | 51494923758b |
line wrap: on
line diff
--- a/lisp/menubar-items.el Sat May 05 10:53:30 2001 +0000 +++ b/lisp/menubar-items.el Sun May 06 08:33:41 2001 +0000 @@ -147,8 +147,9 @@ :active (or (valid-specifier-tag-p 'msprinter) (and (not (eq system-type 'windows-nt)) (fboundp 'lpr-region))) - :suffix (if put-buffer-names-in-file-menu (concat (buffer-name) "...") - "...")] + :suffix (if (region-active-p) "Selection..." + (if put-buffer-names-in-file-menu (concat (buffer-name) "...") + "..."))] ,@(unless (eq system-type 'windows-nt) '(["Prett%_y-Print" ps-print-buffer-with-faces :active (fboundp 'ps-print-buffer-with-faces)