diff options
| author | Glenn Morris <rgm@gnu.org> | 2009-08-22 19:29:18 +0000 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2009-08-22 19:29:18 +0000 |
| commit | e6ce8c4239a0b7003430d94a5f591e1d4ad50213 (patch) | |
| tree | 17852bba62da89f449af8c75f4fe50a3fb89852f /lisp/cus-edit.el | |
| parent | a569b4801085fa14c3bd0d153e389636645908b9 (diff) | |
| download | emacs-e6ce8c4239a0b7003430d94a5f591e1d4ad50213.tar.gz | |
Use forward-line rather than goto-line.
Diffstat (limited to 'lisp/cus-edit.el')
| -rw-r--r-- | lisp/cus-edit.el | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index 9ad6a05fe1a..e0413c19d6c 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -2192,9 +2192,10 @@ and `face'." (when (and (>= pos from) (<= pos to)) (condition-case nil (progn - (if (> column 0) - (goto-line line) - (goto-line (1+ line))) + (goto-char (point-min)) + (forward-line (if (> column 0) + (1- line) + line)) (move-to-column column)) (error nil))))) |