From: Glenn Morris <rgm@gnu.org>
Date: Tue, 22 Jun 2010 03:24:22 +0000 (-0700)
Subject: * lisp/wid-edit.el (widget-complete): Doc fix.
X-Git-Tag: emacs-pretest-23.2.90~139^2~105
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6095a05b11f7457b3dad3db638bf941e76a030db;p=emacs.git

* lisp/wid-edit.el (widget-complete): Doc fix.
---

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