version 1.4, 2016/07/15 04:32:00
|
version 1.5, 2016/08/09 04:04:50
|
Line 16
|
Line 16
|
(replace-match "«" nil t)) |
(replace-match "«" nil t)) |
(while (search-forward "»" nil t) |
(while (search-forward "»" nil t) |
(replace-match "»" nil t)) |
(replace-match "»" nil t)) |
|
(while (search-forward "–" nil t) |
|
(replace-match "–" nil t)) |
(while (search-forward "Є" nil t) ; YE |
(while (search-forward "Є" nil t) ; YE |
(replace-match "Є" nil t)) |
(replace-match "Є" nil t)) |
(beginning-of-buffer) |
(beginning-of-buffer) |