From 0631f894b4be4371f9752be69b5a9e58393e3b97 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 5 Dec 2002 08:39:14 +0000 Subject: [PATCH] (quail-misc-package-ext-info): Remove duplicate entry for chinese-b5-quick. (batch-miscdic-convert): Don't try to call miscdic-convert on files in the directory just following the arg "-dir". --- lisp/international/titdic-cnv.el | 13 ++----------- 1 file changed, 2 insertions(+), 11 deletions(-) diff --git a/lisp/international/titdic-cnv.el b/lisp/international/titdic-cnv.el index 87fff7a8b9..386279d4b3 100644 --- a/lisp/international/titdic-cnv.el +++ b/lisp/international/titdic-cnv.el @@ -667,16 +667,6 @@ To get complete usage, invoke \"emacs -batch -f batch-titdic-convert -h\"." ;; CCE; see the file COPYING. If not, write to the Free Software Foundation, ;; 675 Mass Ave, Cambridge, MA 02139, USA.") - ("chinese-b5-quick" "$(0X|(BB" - "cangjie-table.b5" big5 "quick-b5.el" - quick-b5-converter - "\ -;; # Copyright 2001 Christian Wittern -;; # -;; # Permission to copy and distribute both modified and -;; # unmodified versions is granted without royalty provided -;; # this notice is preserved.") - ("chinese-ctlau" "$AAuTA(B" "CTLau.html" cn-gb-2312 "CTLau.el" ctlau-gb-converter @@ -1171,7 +1161,8 @@ to store generated Quail packages." (if (string= (car command-line-args-left) "-dir") (progn (setq command-line-args-left (cdr command-line-args-left)) - (setq dir (car command-line-args-left)))) + (setq dir (car command-line-args-left)) + (setq command-line-args-left (cdr command-line-args-left)))) (setq filename (car command-line-args-left) command-line-args-left (cdr command-line-args-left)) (if (file-directory-p filename) -- 2.20.1