diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/thingatpt.el | 1 |
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 8dd6c7fd318..97c1e4b5320 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-05-26 Aaron S. Hawley <aaron.s.hawley@gmail.com> + + * thingatpt.el (forward-same-syntax): Handle no ARG case. (Bug#11560) + 2012-05-26 Glenn Morris <rgm@gnu.org> * progmodes/cc-mode.el (auto-mode-alist): Fix typo. diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el index 1600785c117..57bbdf9d94a 100644 --- a/lisp/thingatpt.el +++ b/lisp/thingatpt.el @@ -457,6 +457,7 @@ backwards ARG times if negative." With prefix argument ARG, do it ARG times if positive, or move backwards ARG times if negative." (interactive "p") + (or arg (setq arg 1)) (while (< arg 0) (skip-syntax-backward (char-to-string (char-syntax (char-before)))) |