--- reports/tools.el	2016/08/23 04:03:28	1.7
+++ reports/tools.el	2016/09/23 04:17:50	1.8
@@ -15,10 +15,16 @@
     (beginning-of-buffer)
     (while (search-forward "«" 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) 
     (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
     (replace-match "Є" nil t))
     (beginning-of-buffer)