equal
deleted
inserted
replaced
90 (t nil) )) |
90 (t nil) )) |
91 |
91 |
92 (defvar-local gadict-tr nil |
92 (defvar-local gadict-tr nil |
93 "Translation markers as string separated by comma. Define own |
93 "Translation markers as string separated by comma. Define own |
94 values in .dir-local.el or as -*- gadict-tr: \"...\" -*- file prelude") |
94 values in .dir-local.el or as -*- gadict-tr: \"...\" -*- file prelude") |
|
95 (put 'gadict-tr 'safe-local-variable 'string-or-null-p) |
95 |
96 |
96 (defun gadict-new-entry () |
97 (defun gadict-new-entry () |
97 "Insert new entry template." |
98 "Insert new entry template." |
98 (interactive) |
99 (interactive) |
99 (if (re-search-forward "^__" nil t) |
100 (if (re-search-forward "^__" nil t) |