mlf176f2 pushed a commit to branch externals/ergoemacs-mode in repository elpa.
commit 13076c23d034ec07d8401950ce077eb7de3c98a3 Author: Matthew L. Fidler <[email protected]> Date: Fri Jun 27 07:02:25 2014 -0500 Make the quote selection consistent. --- ergoemacs-functions.el | 4 ++-- 1 files changed, 2 insertions(+), 2 deletions(-) diff --git a/ergoemacs-functions.el b/ergoemacs-functions.el index 2bdbb8a..1a2590f 100644 --- a/ergoemacs-functions.el +++ b/ergoemacs-functions.el @@ -818,8 +818,8 @@ This function should select the whole string." '(font-lock-string-face font-lock-doc-face))) (setq p1 (or (previous-single-property-change (point) 'face (current-buffer) (point-min)) (point-min))) (setq p2 (or (next-single-property-change (point) 'face (current-buffer) (point-max)) (point-max))) - (goto-char p1) - (set-mark p2)) + (goto-char (1+ p1)) + (set-mark (1- p2))) (font-lock-mode (user-error "Cursor not inside quote")) ((and (<= 24 emacs-major-version)
