diff options
| author | Glenn Morris <rgm@gnu.org> | 2013-06-19 00:19:42 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2013-06-19 00:19:42 -0700 |
| commit | 011c45526351ad6b518a0a131a58476086bffecd (patch) | |
| tree | 4ac9719f8aa391041c387aa82db8ee280bf7f105 | |
| parent | 09af5c3e89979e90113f4c21eb8cb5cfe3ff9a07 (diff) | |
| download | emacs-011c45526351ad6b518a0a131a58476086bffecd.tar.gz | |
* international/titdic-cnv.el (tit-process-header, miscdic-convert):
Don't include a date stamp in the header of the generated file;
it leads to needless differences between output files.
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/international/titdic-cnv.el | 6 |
2 files changed, 8 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2e5ca2019ce..793f3ec346b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,9 @@ +2013-06-19 Glenn Morris <rgm@gnu.org> + + * international/titdic-cnv.el (tit-process-header, miscdic-convert): + Don't include a date stamp in the header of the generated file; + it leads to needless differences between output files. + 2013-06-19 Michael Albinus <michael.albinus@gmx.de> * net/secrets.el (secrets-struct-secret-content-type): Replace diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el index 7d7619df70e..bcad78d8ce0 100644 --- a/lisp/international/titdic-cnv.el +++ b/lisp/international/titdic-cnv.el @@ -273,9 +273,8 @@ SPC, 6, 3, 4, or 7 specifying a tone (SPC:$(0?v(N(B, 6:$(0Dm(N(B, 3:$(0&9Vy (princ ";; Quail package `") (princ package) (princ (format "' -*- coding:%s -*-\n" coding-system-for-write)) - (princ ";; Generated by the command `titdic-convert'\n;;\tDate: ") - (princ (current-time-string)) - (princ "\n;;\tOriginal TIT dictionary file: ") + (princ ";; Generated by the command `titdic-convert'\n") + (princ ";;\tOriginal TIT dictionary file: ") (princ (file-name-nondirectory filename)) (princ "\n\n;;; Comment:\n\n") (princ ";; Byte-compile this file again after any modification.\n\n") @@ -1152,7 +1151,6 @@ the generated Quail package is saved." (insert (format ";; Quail package `%s' -*- coding:%s -*-\n" name coding)) (insert ";; Generated by the command `miscdic-convert'\n") - (insert ";; Date: " (current-time-string) "\n") (insert ";; Source dictionary file: " dicfile "\n") (insert ";; Copyright notice of the source file\n") (insert ";;------------------------------------------------------\n") |