# HG changeset patch
# User Oleksandr Gavenko <gavenkoa@gmail.com>
# Date 1458595453 -7200
# Node ID e14e384267ee1ad69064930c036051b39f85ffb0
# Parent  d5d1d3e6d11e499955b90367d2662c38e35238e6
Article template automatically insert translation tags.

diff -r d5d1d3e6d11e -r e14e384267ee contrib/gadict.el
--- 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 ()