diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-10-17 22:55:57 +0200 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2016-10-17 22:55:57 +0200 |
commit | e4d4c6e1bc89b284e475ab4a3dc122754cb59dd9 (patch) | |
tree | cf1d68f74556eccc64e26db294ea2a6e120048b7 | |
parent | 8dbee9185867963b13d064e43a569c31d6fc918c (diff) | |
download | org-mode-e4d4c6e1bc89b284e475ab4a3dc122754cb59dd9.tar.gz |
Fix code typo
* lisp/org.el (org-beginning-of-line):
(org-end-of-line): Fix typo in pattern matching.
Reported-by: Matt Lundin <mdl@imapmail.org>
<http://permalink.gmane.org/gmane.emacs.orgmode/109829>
-rw-r--r-- | lisp/org.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org.el b/lisp/org.el index 3234175..aaa07cc 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -23763,7 +23763,7 @@ With argument N not nil or 1, move forward N - 1 lines first." (interactive "^p") (let ((origin (point)) (special (pcase org-special-ctrl-a/e - (`(,C-a . _) C-a) (_ org-special-ctrl-a/e))) + (`(,C-a . ,_) C-a) (_ org-special-ctrl-a/e))) deactivate-mark) ;; First move to a visible line. (if (bound-and-true-p visual-line-mode) @@ -23822,7 +23822,7 @@ With argument N not nil or 1, move forward N - 1 lines first." (interactive "^p") (let ((origin (point)) (special (pcase org-special-ctrl-a/e - (`(_ . ,C-e) C-e) (_ org-special-ctrl-a/e))) + (`(,_ . ,C-e) C-e) (_ org-special-ctrl-a/e))) deactivate-mark) ;; First move to a visible line. (if (bound-and-true-p visual-line-mode) |