summaryrefslogtreecommitdiff
path: root/misc
diff options
context:
space:
mode:
authornobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2015-12-31 00:39:03 +0000
committernobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>2015-12-31 00:39:03 +0000
commit34167345aca4d869b45de9d43a93d8a4956e0313 (patch)
treef3d4b750a7177840697568149b266f6421b69b72 /misc
parent2fad0168107a39e43dc37b17305e2c1c93c99dba (diff)
ruby-additional.el: encode non-ASCII code only
* misc/ruby-additional.el (ruby-encode-unicode): encode non-ASCII code only, excluding ASCII control code, e.g. \t, \n, etc. git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@53392 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
Diffstat (limited to 'misc')
-rw-r--r--misc/ruby-additional.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/misc/ruby-additional.el b/misc/ruby-additional.el
index 46c3cd23f2..e3f6a02f4d 100644
--- a/misc/ruby-additional.el
+++ b/misc/ruby-additional.el
@@ -114,7 +114,7 @@ Emacs to Ruby."
(setq end (set-marker (make-marker) end))
(goto-char beg)
(while (and (< (point) end)
- (re-search-forward "\\Ca+" end t))
+ (re-search-forward "[^\C-@-~]+" end t))
(let ((u (mapconcat (lambda (c) (format "%x" c)) (match-string-no-properties 0) " ")))
(delete-region (match-beginning 0) (match-end 0))
(insert "\\u{" u "}"))