这是我正在处理的文本:
is_check_point(9) ->
{yes, ['{0,20}', '{3,23}', '{6,26}', '{27,47}', '{30,50}', '{33,53}', '{54,74}', '{57,77}']}
我多次重复了上述文本。它们出现在一个到处都是单引号的文件中。
我想删除包围元组的单引号(语言是 erlang)。
我在 OSX 上使用 Aquamacs
答案1
(defun anthony-kong ()
"Usage: `M-x anthony-kong`"
(interactive)
(replace-regexp "'\{" "{" nil (point-min) (point-max))
(replace-regexp "'\}" "}" nil (point-min) (point-max)) )