diff options
| author | Gerd Moellmann | 2000-06-19 16:05:18 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-06-19 16:05:18 +0000 |
| commit | c17f27f00932283b1d7e86dcaf26580d5fc9f431 (patch) | |
| tree | d7020128a66416b5d85cec2cae6654a25de1e93f | |
| parent | fdd9d55e577251ee2e2458968facae4ff7c48707 (diff) | |
| download | emacs-c17f27f00932283b1d7e86dcaf26580d5fc9f431.tar.gz emacs-c17f27f00932283b1d7e86dcaf26580d5fc9f431.zip | |
(menu-bar-edit-menu): Add menu item for marking
the whole buffer.
| -rw-r--r-- | lisp/menu-bar.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 509e57d3bde..e3adc6f4f65 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -392,6 +392,9 @@ A large number or nil slows down menu responsiveness." | |||
| 392 | '(menu-item "Cut" kill-region | 392 | '(menu-item "Cut" kill-region |
| 393 | :enable (and mark-active (not buffer-read-only)) | 393 | :enable (and mark-active (not buffer-read-only)) |
| 394 | :help "Cut (kill) text in region between mark and current pos")) | 394 | :help "Cut (kill) text in region between mark and current pos")) |
| 395 | (define-key menu-bar-edit-menu [mark-whole-buffer] | ||
| 396 | '(menu-item "Mark Buffer" mark-whole-buffer | ||
| 397 | :help "Mark the whole buffer for a subsequent cut/copy.")) | ||
| 395 | (define-key menu-bar-edit-menu [undo] | 398 | (define-key menu-bar-edit-menu [undo] |
| 396 | '(menu-item "Undo" undo | 399 | '(menu-item "Undo" undo |
| 397 | :enable (and (not buffer-read-only) | 400 | :enable (and (not buffer-read-only) |