--- a/contrib/gadict.el	Mon Mar 21 22:52:54 2016 +0200
+++ b/contrib/gadict.el	Mon Mar 21 22:55:43 2016 +0200
@@ -28,22 +28,19 @@
      ("^\\(?:n\\|v\\|phr\\.v\\|adj\\|adv\\|pron\\|prep\\|num\\|conj\\|int\\)$" . font-lock-type-face) ))
 
 (defun gadict-setup-comment ()
-  (set (make-local-variable 'comment-start) "#")
-  (set (make-local-variable 'comment-continue) nil)
-  (set (make-local-variable 'comment-end) "")
-  (set (make-local-variable 'comment-end-skip) nil)
-  (set (make-local-variable 'comment-multi-line) nil)
-  (set (make-local-variable 'comment-use-syntax) t) )
+  (set (make-local-variable 'comment-start)  "#")
+  (set (make-local-variable 'comment-continue)  nil)
+  (set (make-local-variable 'comment-end)  "")
+  (set (make-local-variable 'comment-end-skip)  nil)
+  (set (make-local-variable 'comment-multi-line)  nil)
+  (set (make-local-variable 'comment-use-syntax)  t) )
 
 (defun gadict-setup-paragraph ()
-  (make-local-variable 'paragraph-separate)
-  (setq paragraph-separate "__$")
-  (make-local-variable 'paragraph-start)
-  (setq paragraph-start "__$") )
+  (set (make-local-variable 'paragraph-separate)  "__$")
+  (set (make-local-variable 'paragraph-start)  "__$") )
 
 (defun gadict-setup-page ()
-  (make-local-variable 'paragraph-separate)
-  (setq page-delimiter "__$"))
+  (set (make-local-variable 'page-delimiter)  "__$") )
 
 (defun gadict-setup-syntax ()
   (modify-syntax-entry ?' "w"))