Mercurial > emacs
comparison lisp/simple.el @ 6943:c41c87311f68
Move pop-global-mark bindings to loaddefs.el.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 18 Apr 1994 04:03:17 +0000 |
| parents | 35e524a24c7f |
| children | 319678b541eb |
comparison
equal
deleted
inserted
replaced
| 6942:90305d5fe5aa | 6943:c41c87311f68 |
|---|---|
| 1445 (or (and (>= position (point-min)) | 1445 (or (and (>= position (point-min)) |
| 1446 (<= position (point-max))) | 1446 (<= position (point-max))) |
| 1447 (widen)) | 1447 (widen)) |
| 1448 (goto-char position) | 1448 (goto-char position) |
| 1449 (switch-to-buffer buffer))) | 1449 (switch-to-buffer buffer))) |
| 1450 (define-key ctl-x-map "\C-@" 'pop-global-mark) | |
| 1451 (define-key ctl-x-map [?\C-\ ] 'pop-global-mark) | |
| 1452 | |
| 1453 | 1450 |
| 1454 (defvar next-line-add-newlines t | 1451 (defvar next-line-add-newlines t |
| 1455 "*If non-nil, `next-line' inserts newline to avoid `end of buffer' error.") | 1452 "*If non-nil, `next-line' inserts newline to avoid `end of buffer' error.") |
| 1456 | 1453 |
| 1457 (defun next-line (arg) | 1454 (defun next-line (arg) |