library "shimbun" is not found.
(TopLevel): Add "/somewhere/apel/" to `load-path' if it is needed.
(locate-library): Redefine it for Mule before it is called.
* README.semi.ja: Update for the use of Emacs-W3M.
* README.semi: Ditto.
* Mule23@1934.ja: Ditto.
* Mule23@1934.en: Ditto.
+2001-05-28 Katsumi Yamaoka <yamaoka@jpl.org>
+
+ * lisp/dgnushack.el (dgnushack-unexporting-files): Add
+ "nnshimbun.el" if the library "shimbun" is not found.
+ (TopLevel): Add "/somewhere/apel/" to `load-path' if it is needed.
+ (locate-library): Redefine it for Mule before it is called.
+
+ * README.semi.ja: Update for the use of Emacs-W3M.
+ * README.semi: Ditto.
+ * Mule23@1934.ja: Ditto.
+ * Mule23@1934.en: Ditto.
+
2001-05-28 TSUCHIYA Masatoshi <tsuchiya@pine.kuee.kyoto-u.ac.jp>
* lisp/nnshimbun.el: Reconstructed to use `shimbun'.
% make install
-USING Emacs W3
-==============
-
-;; By the way, it is the point, does anyone know where do we find
-;; Emacs W3 package fitting with Mule 2.3 based on Emacs 19.34? :-p
-
-Some modules of T-gnus (e.g. nnshimbun) requires Emacs W3. You can
-build T-gnus to be abel to use them, if you already have Emacs W3
-installed. For that, you should specify the path where Emacs W3 is
-installed using the configure option `--with-w3=' or editing the file
-`~/.lpath.el'. Here is an example for using the configure option:
+USING Emacs-W3M (and Emacs W3)
+==============================
+The web based backend `nnshimbun' uses the shimbun modules which are
+included in Emacs-W3M package (and the other web based backends of T-
+gnus requires Emacs W3). Emacs-W3M is an interface program to the
+external command W3M, visit the following pages for more information.
+
+ http://namazu.org/~tsuchiya/emacs-w3m/
+ http://ei5nazha.yz.yamagata-u.ac.jp/~aito/w3m/
+
+If you wish to build T-gnus to be abel to use Emacs-W3M and nnshimbun,
+you have to specify the path where Emacs-W3M is installed using the
+configure option `--with-addpath=' (for Emacs W3, use the configure
+option `--with-w3=' or editing the file `~/.lpath.el'). Here is an
+example for that:
% ./configure --with-emacs=mule\
+ --with-addpath=~/elisp/emu/:~/elisp/apel/: ... :~/elisp/w3m/\
--with-w3=/usr/local/share/mule/site-lisp/w3/
% make install
-Don't mind if configure says "W3... not found". It is currently
-malfunction when the configure option `--with-w3=' is not used even if
-the path of Emacs W3 is specified in the file `~/.lpath.el'.
+;; Don't mind if configure says "W3... not found". It is currently
+;; malfunction when the configure option `--with-w3=' is not used even
+;; if the path of Emacs W3 is specified in the file `~/.lpath.el'.
+
+;; By the way, does anyone know where do we find Emacs W3 package
+;; which is suitable to Mule 2.3 based on Emacs 19.34?
% ./configure --with-emacs=mule
% make install
-USING Emacs W3
-==============
-;; \e$B$H$3$m$G!"4N?4$J$3$H$J$s$G$9$,!"C/$+\e(B Emacs 19.34 \e$B$r%Y!<%9$K$7$?\e(B
-;; Mule 2.3 \e$B$KE,9g$9$k\e(B Emacs W3 \e$B$,$I$3$K$"$k$+CN$j$^$;$s$+\e(B? :-p
+USING Emacs-W3M (and Emacs W3)
+==============================
+\e$B%&%'%V$K4p$E$$$?%P%C%/%(%s%I$G$"$k\e(B `nnshimbun' \e$B$O!"\e(BEmacs-W3M \e$B%Q%C%1!<\e(B
+\e$B%8$K4^$^$l$F$$$k\e(B shimbun \e$B%b%8%e!<%k$r;H$$$^$9\e(B (\e$BB>$N\e(B T-gnus \e$B$N%&%'%V$K\e(B
+\e$B4p$E$$$?%P%C%/%(%s%I$O\e(B Emacs W3 \e$B$rI,MW$H$7$^$9\e(B)\e$B!#\e(BEmacs-W3M \e$B$O30It%3%^\e(B
+\e$B%s%I\e(B W3M \e$B$X$N%$%s%?!<%U%'!<%9$r9T$J$&%W%m%0%i%`$G!">\:Y>pJs$K$D$$$F$O\e(B
+\e$B0J2<$N%Z!<%8$rK,$M$F$_$F2<$5$$!#\e(B
+
+ http://namazu.org/~tsuchiya/emacs-w3m/
+ http://ei5nazha.yz.yamagata-u.ac.jp/~aito/w3m/
-\e$B$$$/$D$+$N\e(B T-gnus \e$B$N%b%8%e!<%k\e(B (\e$BNc$($P\e(B nnshimbun) \e$B$O\e(B Emacs W3 \e$B$rI,MW$H\e(B
-\e$B$7$^$9!#$b$7$"$J$?$,$9$G$K\e(B Emacs W3 \e$B$r%$%s%9%H!<%k$7$F$"$k$N$J$i$P!"$"\e(B
-\e$B$J$?$O$=$l$i$r;H$($k$h$&$K\e(B T-gnus \e$B$r:n$k$3$H$,$G$-$^$9!#$=$N$?$a$K$O!"\e(B
-configure \e$B%*%W%7%g%s$N\e(B `--with-w3=' \e$B$r;H$&$+\e(B `~/.lpath.el' \e$B%U%!%$%k$r\e(B
-\e$BJT=8$7$F!"\e(BEmacs W3 \e$B$,%$%s%9%H!<%k$5$l$F$$$k\e(B path \e$B$r;XDj$7$J$1$l$P$J$j\e(B
-\e$B$^$;$s!#0J2<$O\e(B configure \e$B%*%W%7%g%s$r;H$&Nc$G$9!#\e(B
+Emacs-W3M \e$B$H\e(B nnshimbun \e$B$,;H$($k$h$&$K\e(B T-gnus \e$B$r:n$k$K$O!"\e(BEmacs-W3M \e$B$,\e(B
+\e$B%$%s%9%H!<%k$5$l$F$$$k%Q%9$r\e(B configure \e$B%*%W%7%g%s$N\e(B `--with-addpath='
+\e$B$G;XDj$7$J$1$l$P$J$j$^$;$s\e(B (Emacs W3 \e$BMQ$K$O\e(B `--with-w3=' \e$B$r;H$&$+!"$^\e(B
+\e$B$?$O\e(B `~/.lpath.el' \e$B%U%!%$%k$rJT=8$7$F2<$5$$\e(B)\e$B!#0J2<$ONc$G$9!#\e(B
% ./configure --with-emacs=mule\
+ --with-addpath=~/elisp/emu/:~/elisp/apel/: ... :~/elisp/w3m/\
--with-w3=/usr/local/share/mule/site-lisp/w3/
% make install
-\e$B$b$7\e(B configure \e$B$,!V\e(BW3... not found\e$B!W$H8@$C$F$b5$$K$7$J$$$G2<$5$$!#$?$H\e(B
-\e$B$(\e(B `~/.lpath.el' \e$B%U%!%$%k$G\e(B Emacs W3 \e$B$N\e(B path \e$B$,;XDj$5$l$F$$$F$b!"\e(B
-configure \e$B%*%W%7%g%s$N\e(B `--with-w3=' \e$B$r;H$o$J$$$H!"8=:_$=$l$O@5>o$KF/$-\e(B
-\e$B$^$;$s$N$G!#\e(B
+;; \e$B$b$7\e(B configure \e$B$,!V\e(BW3... not found\e$B!W$H8@$C$F$b5$$K$7$J$$$G2<$5$$!#\e(B
+;; \e$B$?$H$(\e(B `~/.lpath.el' \e$B%U%!%$%k$G\e(B Emacs W3 \e$B$N\e(B path \e$B$,;XDj$5$l$F$$$F$b!"\e(B
+;; configure \e$B%*%W%7%g%s$N\e(B `--with-w3=' \e$B$r;H$o$J$$$H!"8=:_$=$l$O@5>o$K\e(B
+;; \e$BF/$-$^$;$s$N$G!#\e(B
+
+;; \e$B$H$3$m$G!"C/$+\e(B Emacs 19.34 \e$B$r%Y!<%9$K$7$?\e(B Mule 2.3 \e$B$KE,9g$9$k\e(B Emacs
+;; W3 \e$B$,$I$3$K$"$k$+CN$j$^$;$s$+\e(B?
Required environment for SEMI is written in README.en of SEMI package.
+ In addition, if you wish to use the web based backend `nnshimbun',
+you have to install the package Emacs-W3M and the external command W3M.
+Visit the following pages for more information.
+
+http://namazu.org/~tsuchiya/emacs-w3m/
+http://ei5nazha.yz.yamagata-u.ac.jp/~aito/w3m/
+
How to get? (via CVS)
=====================
\e$B$+$i<hF@$9$k$3$H$,$G$-$^$9!#I,MW$J4D6-$O\e(B SEMI \e$B$N\e(B README.ja \e$B$r;2>H$7$F\e(B
\e$B$/$@$5$$!#\e(B
+ \e$B2C$($F!"\e(B`nnshimbun' \e$B$r;H$$$?$$>l9g$K$O!"\e(BEmacs-W3M \e$B%Q%C%1!<%8$H30It\e(B
+\e$B%3%^%s%I$N\e(B W3M \e$B$,I,MW$G$9!#>\$7$$$3$H$O0J2<$N%Z!<%8$r$4Mw2<$5$$!#\e(B
+
+http://namazu.org/~tsuchiya/emacs-w3m/
+http://ei5nazha.yz.yamagata-u.ac.jp/~aito/w3m/
+
\e$B<hF@J}K!\e(B (CVS)
==============
(require 'bytecomp)
+(when (boundp 'MULE)
+ (let (current-load-list)
+ ;; Make the function to be silent at compile-time.
+ (defun locate-library (library &optional nosuffix)
+ "Show the full path name of Emacs library LIBRARY.
+This command searches the directories in `load-path' like `M-x load-library'
+to find the file that `M-x load-library RET LIBRARY RET' would load.
+Optional second arg NOSUFFIX non-nil means don't add suffixes `.elc' or `.el'
+to the specified name LIBRARY (a la calling `load' instead of `load-library')."
+ (interactive "sLocate library: ")
+ (catch 'answer
+ (mapcar
+ '(lambda (dir)
+ (mapcar
+ '(lambda (suf)
+ (let ((try (expand-file-name (concat library suf) dir)))
+ (and (file-readable-p try)
+ (null (file-directory-p try))
+ (progn
+ (or noninteractive
+ (message "Library is file %s" try))
+ (throw 'answer try)))))
+ (if nosuffix '("") '(".elc" ".el" ""))))
+ load-path)
+ (or noninteractive
+ (message "No library %s in search path" library))
+ nil))
+ (byte-compile 'locate-library)))
+
(unless (fboundp 'si:byte-optimize-form-code-walker)
(byte-optimize-form nil);; Load `byte-opt' or `byte-optimize'.
(setq max-specpdl-size 3000)
;; Don't load path-util until `char-after' and `char-before' have been
;; optimized because it requires `poe' and then modify the functions.
-(or (featurep 'path-util)
- (load "apel/path-util"))
-(or (locate-library "poe")
- (add-path "apel"))
-(or (locate-library "mel")
- (add-path "flim"))
+
+;; If the APEL modules have been installed under the directory
+;; "/usr/local/share/mule/site-lisp/apel/", the parent directory
+;; "/usr/local/share/mule/site-lisp/" should be included in the
+;; standard `load-path' or added by the configure option
+;; "--with-addpath=". And also the directory where the EMU modules
+;; have been installed (e.g. "/usr/local/share/mule/19.34/site-lisp/")
+;; should be included in the standard `load-path' or added by the
+;; configure option "--with-addpath=".
+(unless (featurep 'path-util)
+ (let ((path (locate-library "apel/path-util")))
+ (if path
+ (progn
+ (when (string-match "/$" (setq path (file-name-directory path)))
+ (setq path (substring path 0 (match-beginning 0))))
+ (unless (or (member path load-path)
+ (member (file-name-as-directory path) load-path))
+ (push path load-path))
+ (require 'path-util))
+ (error "
+APEL modules does not found in %s.
+Try to re-configure with --with-addpath=APEL_PATH and run make again.
+"
+ load-path))))
+(unless (locate-library "mel")
+ (add-path "flim"))
(unless (module-installed-p 'mel)
;; FLIM 1.14 may have installed in two "flim" subdirectories.
(push (expand-file-name "flim"
load-path)
(unless (module-installed-p 'mel)
(error "
-FLIM package does not found in %s.
+FLIM modules does not found in %s.
Try to re-configure with --with-addpath=FLIM_PATH and run make again.
"
- (progn
- (add-path "semi")
- load-path))))
+ load-path)))
(add-path "semi")
(push srcdir load-path)
byte-compile-function-environment)))
form)
-(when (boundp 'MULE)
- (let (current-load-list)
- ;; Make the function to be silent at compile-time.
- (defun locate-library (library &optional nosuffix)
- "Show the full path name of Emacs library LIBRARY.
-This command searches the directories in `load-path' like `M-x load-library'
-to find the file that `M-x load-library RET LIBRARY RET' would load.
-Optional second arg NOSUFFIX non-nil means don't add suffixes `.elc' or `.el'
-to the specified name LIBRARY (a la calling `load' instead of `load-library')."
- (interactive "sLocate library: ")
- (catch 'answer
- (mapcar
- '(lambda (dir)
- (mapcar
- '(lambda (suf)
- (let ((try (expand-file-name (concat library suf) dir)))
- (and (file-readable-p try)
- (null (file-directory-p try))
- (progn
- (or noninteractive
- (message "Library is file %s" try))
- (throw 'answer try)))))
- (if nosuffix '("") '(".elc" ".el" ""))))
- load-path)
- (or noninteractive
- (message "No library %s in search path" library))
- nil))
- (byte-compile 'locate-library)))
-
(condition-case nil
:symbol-for-testing-whether-colon-keyword-is-available-or-not
(void-variable
(defconst dgnushack-unexporting-files
(append '("dgnushack.el" "dgnuspath.el" "dgnuskwds.el" "lpath.el")
+ (condition-case nil
+ (progn (require 'shimbun) nil)
+ (error '("nnshimbun.el")))
(unless (or (condition-case code
(require 'w3-forms)
(error
projects / elisp / gnus.git- / commitdiff