Mercurial > hg > xemacs-beta
comparison lisp/toolbar.el @ 487:54fa1a5c2d12
[xemacs-hg @ 2001-04-28 07:48:36 by ben]
misc changes, some for 21.4
remove bogus lines setting zmacs_region_stays to 0.
remove debug lines.
Correct general info about init file.
Fix up Cygwin section.
More contributions.
Fix spurious setting of zmacs-region-stays to t after a non-shift
motion command.
Sync up with FSF 20.7, to fix bugs handling some etags line formats.
Move non-window-system specific code that was duplicated in
all window systems into the generic code.
* gutter.el (init-gutter): Removed. (unused)
Clean up the rectangle code w.r.t. selections. You'll now get
the right text copied into the primary selection (but not the
clipboard yet, unfortunately -- that really requires defining
our own rectangle type).
author | ben |
---|---|
date | Sat, 28 Apr 2001 07:48:46 +0000 |
parents | abe6d1db359e |
children | 7039e6323819 |
comparison
equal
deleted
inserted
replaced
486:a83afd50994d | 487:54fa1a5c2d12 |
---|---|
99 (let ((name (locate-data-directory "toolbar"))) | 99 (let ((name (locate-data-directory "toolbar"))) |
100 (if name | 100 (if name |
101 (setq toolbar-icon-directory | 101 (setq toolbar-icon-directory |
102 (file-name-as-directory name)))))) | 102 (file-name-as-directory name)))))) |
103 | 103 |
104 ;; called from toolbar.c during device and frame initialization | |
104 (defun init-toolbar-from-resources (locale) | 105 (defun init-toolbar-from-resources (locale) |
105 (if (and (featurep 'x) | 106 (if (and (featurep 'x) |
106 (not (featurep 'infodock)) | 107 (not (featurep 'infodock)) |
107 (or (eq locale 'global) | 108 (or (eq locale 'global) |
108 (eq 'x (device-or-frame-type locale)))) | 109 (eq 'x (device-or-frame-type locale)))) |