--- a/contrib/gadict.el	Mon Mar 21 22:57:15 2016 +0200
+++ b/contrib/gadict.el	Mon Mar 21 23:24:13 2016 +0200
@@ -74,6 +74,10 @@
     t)
    (t nil) ))
 
+(defvar-local gadict-tr nil
+  "Translation markers as string separated by comma. Define own
+  values in .dir-local.el or as -*- gadict-tr: \"...\" -*- file prelude")
+
 (defun gadict-new-entry ()
   "Insert new entry template."
   (interactive)
@@ -85,6 +89,14 @@
   (insert-char ?\n)
   (insert-char ?_ 2)
   (insert-char ?\n 3)
+  (when (stringp gadict-tr)
+    (mapc (lambda (tr)
+            (insert-char ?\n)
+            (insert tr)
+            (insert ": "))
+          (split-string gadict-tr ","))
+    (insert-char ?\n)
+    (re-search-backward "^$"))
   (backward-char))
 
 (defun gadict-setup-keymap ()