diff options
author | taoka <taoka@FreeBSD.org> | 2000-07-11 01:36:21 +0800 |
---|---|---|
committer | taoka <taoka@FreeBSD.org> | 2000-07-11 01:36:21 +0800 |
commit | 7f5010c567a37743f47e0115b3fec8cd2df0d8ee (patch) | |
tree | 4b5024649bc313958227613fc116adf1b3c384c5 /japanese/lookup | |
parent | 805713ec03713c5f9683261f4357b81e4b93dd25 (diff) | |
download | freebsd-ports-gnome-7f5010c567a37743f47e0115b3fec8cd2df0d8ee.tar.gz freebsd-ports-gnome-7f5010c567a37743f47e0115b3fec8cd2df0d8ee.tar.zst freebsd-ports-gnome-7f5010c567a37743f47e0115b3fec8cd2df0d8ee.zip |
lookup-1.3 has two bugs (do not do lookup-splash on XEmacs and
unable to compile on mule-2.3).
These patches is to fix these problems.
Diffstat (limited to 'japanese/lookup')
-rw-r--r-- | japanese/lookup/files/patch-aa | 20 | ||||
-rw-r--r-- | japanese/lookup/files/patch-ab | 14 |
2 files changed, 34 insertions, 0 deletions
diff --git a/japanese/lookup/files/patch-aa b/japanese/lookup/files/patch-aa new file mode 100644 index 000000000000..8a3102c17c57 --- /dev/null +++ b/japanese/lookup/files/patch-aa @@ -0,0 +1,20 @@ +--- lisp/lookup.el~ Fri Jun 16 12:44:14 2000 ++++ lisp/lookup.el Sun Jun 25 00:53:24 2000 +@@ -620,7 +620,8 @@ + (defmacro logo-image () + (with-temp-buffer + (cond ((featurep 'xemacs) +- (insert-file-contents lookup-logo-file)) ++ (let ((format-alist nil)) ++ (insert-file-contents lookup-logo-file))) + ((locate-library "bitmap") + (require 'bitmap) + (bitmap-insert-xbm-file lookup-logo-file) +@@ -637,6 +638,7 @@ + (or lookup-use-bitmap (featurep 'xemacs))) + (let ((buffer (get-buffer-create "*Lookup Logo*"))) + (set-buffer buffer) ++ (setq fill-column (window-width)) + (erase-buffer) + (if (featurep 'xemacs) + (let ((logo-glyph (make-glyph (vector 'xpm :data lookup-logo-image))) diff --git a/japanese/lookup/files/patch-ab b/japanese/lookup/files/patch-ab new file mode 100644 index 000000000000..24ab23124c51 --- /dev/null +++ b/japanese/lookup/files/patch-ab @@ -0,0 +1,14 @@ +--- lisp/lookup-vars.el.in~ Sat Jun 17 09:55:39 2000 ++++ lisp/lookup-vars.el.in Wed Jun 21 16:57:28 2000 +@@ -167,8 +167,9 @@ + :type 'boolean + :group 'lookup-general-options) + +-(defcustom lookup-use-kakasi (or (locate-library "kakasi" nil exec-path) +- (locate-library "kakasi.exe" nil exec-path)) ++(defcustom lookup-use-kakasi (let ((load-path exec-path)) ++ (or (locate-library "kakasi") ++ (locate-library "kakasi.exe"))) + "*Non-nil を指定すると、いくつかの局面で KAKASI が利用される。 + これは現在、具体的には日本語のデフォルトの検索語の切り出しに用いている。" + :type 'boolean |