ruby-changes:28766
From: knu <ko1@a...>
Date: Sun, 19 May 2013 02:38:23 +0900 (JST)
Subject: [ruby-changes:28766] knu:r40818 (trunk): * misc/ruby-electric.el (ruby-electric-setup-keymap): Make
knu 2013-05-19 02:38:08 +0900 (Sun, 19 May 2013) New Revision: 40818 http://svn.ruby-lang.org/cgi-bin/viewvc.cgi?view=rev&revision=40818 Log: * misc/ruby-electric.el (ruby-electric-setup-keymap): Make backquotes electric as well. It was listed in ruby-electric-expand-delimiters-list but not activated. Modified files: trunk/ChangeLog trunk/misc/ruby-electric.el Index: ChangeLog =================================================================== --- ChangeLog (revision 40817) +++ ChangeLog (revision 40818) @@ -1,4 +1,8 @@ https://github.com/ruby/ruby/blob/trunk/ChangeLog#L1 -Sun May 19 02:30:00 2013 Akinori MUSHA <knu@i...> +Sun May 19 02:33:09 2013 Akinori MUSHA <knu@i...> + + * misc/ruby-electric.el (ruby-electric-setup-keymap): Make + backquotes electric as well. It was listed in + ruby-electric-expand-delimiters-list but not activated. * misc/ruby-electric.el (ruby-electric-delete-backward-char): Introduce electric DEL that deletes what the previous electric Index: misc/ruby-electric.el =================================================================== --- misc/ruby-electric.el (revision 40817) +++ misc/ruby-electric.el (revision 40818) @@ -120,6 +120,7 @@ strings. Note that you must have Font Lo https://github.com/ruby/ruby/blob/trunk/misc/ruby-electric.el#L120 (define-key ruby-mode-map "[" 'ruby-electric-matching-char) (define-key ruby-mode-map "\"" 'ruby-electric-matching-char) (define-key ruby-mode-map "\'" 'ruby-electric-matching-char) + (define-key ruby-mode-map "`" 'ruby-electric-matching-char) (define-key ruby-mode-map "}" 'ruby-electric-closing-char) (define-key ruby-mode-map ")" 'ruby-electric-closing-char) (define-key ruby-mode-map "]" 'ruby-electric-closing-char) @@ -279,7 +280,7 @@ strings. Note that you must have Font Lo https://github.com/ruby/ruby/blob/trunk/misc/ruby-electric.el#L280 (ruby-electric-string-at-point-p))) (save-excursion (insert closing)) (and (eq last-command 'ruby-electric-matching-char) - (char-equal (following-char) closing) ;; repeated ' or " + (char-equal (following-char) closing) ;; repeated quotes (delete-forward-char 1)) (setq this-command 'self-insert-command))) ((ruby-electric-code-at-point-p) -- ML: ruby-changes@q... Info: http://www.atdot.net/~ko1/quickml/