[1697] | 1 | --- ddskk-11.6.0/SKK-MK.orig Sun Dec 16 12:56:34 2001 |
---|
| 2 | +++ ddskk-11.6.0/SKK-MK Thu Dec 27 10:52:03 2001 |
---|
| 3 | @@ -794,8 +794,8 @@ |
---|
| 4 | (make-directory PACKAGE_LISPDIR t)) |
---|
| 5 | (unless (file-exists-p PACKAGE_DATADIR) |
---|
| 6 | (make-directory PACKAGE_DATADIR t)) |
---|
| 7 | - (unless (file-exists-p PACKAGE_INFODIR) |
---|
| 8 | - (make-directory PACKAGE_INFODIR t)) |
---|
| 9 | +;; (unless (file-exists-p PACKAGE_INFODIR) |
---|
| 10 | +;; (make-directory PACKAGE_INFODIR t)) |
---|
| 11 | ;; delete already installed unnecessary files. |
---|
| 12 | (setq SKK_MODULES (delq 'skk-autoloads |
---|
| 13 | (append |
---|
| 14 | @@ -895,19 +895,19 @@ |
---|
| 15 | ;; install skk-setup.el |
---|
| 16 | (install-elisp-modules (list 'skk-setup) "." PACKAGE_LISPDIR) |
---|
| 17 | ;; install infos. |
---|
| 18 | - (SKK-MK-compile-info) |
---|
| 19 | - (when SKK_INFO |
---|
| 20 | - (let ((files (list SKK_INFO)) |
---|
| 21 | - (i 1) |
---|
| 22 | - file) |
---|
| 23 | - (while (file-exists-p |
---|
| 24 | - (expand-file-name |
---|
| 25 | - (setq file (format "%s-%d" SKK_INFO i)) |
---|
| 26 | - DOCDIR)) |
---|
| 27 | - (setq files (cons file files)) |
---|
| 28 | - (setq i (1+ i))) |
---|
| 29 | - (install-files (nreverse files) DOCDIR |
---|
| 30 | - PACKAGE_INFODIR nil t nil))) |
---|
| 31 | +;; (SKK-MK-compile-info) |
---|
| 32 | +;; (when SKK_INFO |
---|
| 33 | +;; (let ((files (list SKK_INFO)) |
---|
| 34 | +;; (i 1) |
---|
| 35 | +;; file) |
---|
| 36 | +;; (while (file-exists-p |
---|
| 37 | +;; (expand-file-name |
---|
| 38 | +;; (setq file (format "%s-%d" SKK_INFO i)) |
---|
| 39 | +;; DOCDIR)) |
---|
| 40 | +;; (setq files (cons file files)) |
---|
| 41 | +;; (setq i (1+ i))) |
---|
| 42 | +;; (install-files (nreverse files) DOCDIR |
---|
| 43 | +;; PACKAGE_INFODIR nil t nil))) |
---|
| 44 | ;; install tutorials. |
---|
| 45 | (install-files SKK_TUTORIALS ETCDIR |
---|
| 46 | PACKAGE_DATADIR nil t nil) |
---|