version 1.7, 2016/08/23 04:03:28
|
version 1.8, 2016/09/23 04:17:50
|
Line 15
|
Line 15
|
(beginning-of-buffer) |
(beginning-of-buffer) |
(while (search-forward "«" nil t) |
(while (search-forward "«" nil t) |
(replace-match "«" nil t)) |
(replace-match "«" nil t)) |
|
(beginning-of-buffer) |
(while (search-forward "»" nil t) |
(while (search-forward "»" nil t) |
(replace-match "»" nil t)) |
(replace-match "»" nil t)) |
|
(beginning-of-buffer) |
(while (search-forward "–" nil t) |
(while (search-forward "–" nil t) |
(replace-match "–" nil t)) |
(replace-match "–" nil t)) |
|
(beginning-of-buffer) |
|
(while (search-forward "—" nil t) |
|
(replace-match "—" nil t)) |
|
(beginning-of-buffer) |
(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) |