[BACK]Return to init-openxm.scm CVS log [TXT][DIR] Up to [local] / OpenXM / src / kxx

Diff for /OpenXM/src/kxx/init-openxm.scm between version 1.8 and 1.10

version 1.8, 2004/03/16 04:53:29 version 1.10, 2004/03/17 13:28:38
Line 1 
Line 1 
 ; $OpenXM: OpenXM/src/kxx/init-openxm.scm,v 1.7 2004/03/16 03:26:40 ohara Exp $  ; $OpenXM: OpenXM/src/kxx/init-openxm.scm,v 1.9 2004/03/16 11:41:15 ohara Exp $
   
 (define (openxm-eval t)  (define (openxm-eval t)
   (import-from (texmacs plugin plugin-cmd))    (import-from (texmacs plugin plugin-cmd))
Line 19 
Line 19 
 (define w3m-cmd  (define w3m-cmd
   (cond    (cond
    ((url-exists-in-path? "w3m")     ((url-exists-in-path? "w3m")
         (cond ((url-exists-in-path? "rxvt")  "rxvt  -g 100x50 -e w3m")      (cond ((url-exists-in-path? "rxvt")  "rxvt  -g 100x50 -e w3m")
                   ((url-exists-in-path? "xterm") "xterm -g 100x50 -e w3m")            ((url-exists-in-path? "xterm") "xterm -g 100x50 -e w3m")
                   (else #f)))            (else #f)))
    ((url-exists-in-path? "mozilla" ) "mozilla" )     ((url-exists-in-path? "mozilla" ) "mozilla" )
    ((url-exists-in-path? "netscape") "netscape")     ((url-exists-in-path? "netscape") "netscape")
    ((url-exists-in-path? "iexplore") "iexplore")     ((url-exists-in-path? "iexplore") "iexplore")
Line 66 
Line 66 
           ("Asir-contrib manual"            ("Asir-contrib manual"
            (w3m-search "doc/asir-contrib/html-ja/cman-ja_toc.html")))             (w3m-search "doc/asir-contrib/html-ja/cman-ja_toc.html")))
         (-> "Web"          (-> "Web"
           ("The OpenXM Project"  (w3m "http://www.math.kobe-u.ac.jp/OpenXM/")))            ("The OpenXM Project"  (w3m "http://www.math.kobe-u.ac.jp/OpenXM/"))
             ("Risa/Asir web page"  (w3m "http://www.math.kobe-u.ac.jp/Asir/index-ja.html")))
         )))          )))
 )  )
   
Legend:
Removed from v.1.8  
changed lines
  Added in v.1.10
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>