1 |
;;; simple.el --- basic editing commands for Emacs |
;;; simple.el --- basic editing commands for Emacs |
2 |
|
|
3 |
;; Copyright (C) 1985, 86, 87, 93, 94, 95, 96, 97, 98, 99, |
;; Copyright (C) 1985, 86, 87, 93, 94, 95, 96, 97, 98, 99, |
4 |
;; 2000, 01, 02, 03, 04 |
;; 2000, 01, 02, 03, 2004 |
5 |
;; Free Software Foundation, Inc. |
;; Free Software Foundation, Inc. |
6 |
|
|
7 |
;; Maintainer: FSF |
;; Maintainer: FSF |
3916 |
At top-level, as an editor command, this simply beeps." |
At top-level, as an editor command, this simply beeps." |
3917 |
(interactive) |
(interactive) |
3918 |
(deactivate-mark) |
(deactivate-mark) |
3919 |
|
(if (fboundp 'kmacro-keyboard-quit) |
3920 |
|
(kmacro-keyboard-quit)) |
3921 |
(setq defining-kbd-macro nil) |
(setq defining-kbd-macro nil) |
3922 |
(signal 'quit nil)) |
(signal 'quit nil)) |
3923 |
|
|