diff options
| author | Glenn Morris <rgm@gnu.org> | 2010-06-21 20:24:22 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2010-06-21 20:24:22 -0700 |
| commit | 6095a05b11f7457b3dad3db638bf941e76a030db (patch) | |
| tree | 856eb3c8ddc9c62869021742b981dc2551632da5 /lisp/wid-edit.el | |
| parent | 2b1b005c7615795c39008e91c3db844cf2ff3f5f (diff) | |
| download | emacs-6095a05b11f7457b3dad3db638bf941e76a030db.tar.gz | |
* lisp/wid-edit.el (widget-complete): Doc fix.
Diffstat (limited to 'lisp/wid-edit.el')
| -rw-r--r-- | lisp/wid-edit.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el index fa215031465..0859f8fba56 100644 --- a/lisp/wid-edit.el +++ b/lisp/wid-edit.el @@ -1156,9 +1156,12 @@ the field." (if field (narrow-to-region (line-beginning-position) (line-end-position))))) +;; This used to say: +;; "When not inside a field, move to the previous button or field." +;; but AFAICS, it has always just thrown an error. (defun widget-complete () "Complete content of editable field from point. -When not inside a field, move to the previous button or field." +When not inside a field, signal an error." (interactive) (let ((field (widget-field-find (point)))) (if field |