diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/wid-edit.el | 5 |
2 files changed, 8 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2c58cf654dd..ef19f93455f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2010-06-22 Glenn Morris <rgm@gnu.org> + + * wid-edit.el (widget-complete): Doc fix. + 2010-06-22 Jürgen Hötzel <juergen@hoetzel.info> (tiny change) * wid-edit.el (widget-complete): Fix typo in 2009-12-02 change. 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 |