![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to init-asir.scm CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / texmacs / asir / progs|
Return to init-asir.scm CVS log | Up to [local] / OpenXM / src / texmacs / asir / progs |
| version 1.2, 2004/02/28 19:00:48 | version 1.3, 2009/02/22 17:30:03 | ||
|---|---|---|---|
|
|
||
| ; $OpenXM: OpenXM/src/texmacs/asir/progs/init-asir.scm,v 1.1 2004/02/25 14:45:28 ohara Exp $ | ; $OpenXM: OpenXM/src/texmacs/asir/progs/init-asir.scm,v 1.2 2004/02/28 19:00:48 ohara Exp $ | ||
| (define (asir-initialize) | (define (asir-initialize) | ||
| (menu-extend help-menu | (menu-extend help-menu | ||
| (if (in-asir?) | | (if (in-asir?) | | ||
| ("Risa/Asir manual" (load-buffer "http://www.math.kobe-u.ac.jp/OpenXM/Current/doc/asir2000/html-eg/man_toc.html"))) | ("Risa/Asir manual" (load-buffer "http://www.math.kobe-u.ac.jp/OpenXM/Current/doc/asir2000/html-en/man_toc.html"))) | ||
| (if (in-asir?) | | (if (in-asir?) | | ||
| ("Asir-contrib" (load-buffer "http://www.math.kobe-u.ac.jp/OpenXM/Current/doc/asir-contrib/html-en/cman-en_toc.html"))) | ("Asir-contrib" (load-buffer "http://www.math.kobe-u.ac.jp/OpenXM/Current/doc/asir-contrib/html-en/cman-en_toc.html"))) | ||
| (if (in-asir?) | | (if (in-asir?) | |