diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-07-26 15:51:56 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-07-26 15:51:56 +0000 |
| commit | 8bce086749c63d6812a8df1e49592119091379ee (patch) | |
| tree | 11fd6b7fa842519517c6e8a26c9dc529c8da9f58 /lisp/play | |
| parent | bd37f91150d71bbffb0311a21800edb6929cf597 (diff) | |
| download | emacs-8bce086749c63d6812a8df1e49592119091379ee.tar.gz | |
(dissociated-press): Error at start if buffer is empty.
Diffstat (limited to 'lisp/play')
| -rw-r--r-- | lisp/play/dissociate.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/play/dissociate.el b/lisp/play/dissociate.el index 6939f320f79..2f564151db7 100644 --- a/lisp/play/dissociate.el +++ b/lisp/play/dissociate.el @@ -45,6 +45,8 @@ Default is 2." (move-amount (if (> arg 0) arg (- arg))) (search-function (if (> arg 0) 'search-forward 'word-search-forward)) (last-query-point 0)) + (if (= (point-max) (point-min)) + (error "The buffer contains no text to start from")) (switch-to-buffer outbuf) (erase-buffer) (while |