OpenXM/src/texmacs/asir/progs/init-asir.scm - diff

Return to init-asir.scm CVS log

Up to [local] / OpenXM / src / texmacs / asir / progs

version 1.1, 2004/02/25 14:45:28

version 1.2, 2004/02/28 19:00:48

Line 1

; $OpenXM$

; $OpenXM: OpenXM/src/texmacs/asir/progs/init-asir.scm,v 1.1 2004/02/25 14:45:28 ohara Exp $

; (define (asir-initialize)

(define (asir-initialize)

; (menu-extend texmacs-session-help-icons

(menu-extend help-menu

; (if (and (in-asir?)

(if (in-asir?) |

; (url-exists? "$OpenXM_HOME/doc/asir2000/html-eg/man_toc.html"))

; |

(if (in-asir?) |

; ((balloon (icon "tm_help.xpm") "Asir manual")

; (load-help-buffer "$OpenXM_HOME/doc/asir2000/html-eg/man_toc.html")))

(if (in-asir?) |

; ))

("OpenXM Project" (load-buffer "http://www.math.kobe-u.ac.jp/OpenXM/")))

))

(plugin-configure asir

(:require (url-exists-in-path? "ox_asir"))

; (:initialize (asir-initialize))

(:launch "tm_asir")

(:session "Asir"))

(:session "Risa/Asir"))