Mercurial > hg > octave-avbm
changeset 2308:2aa0453bfea3
[project @ 1996-07-11 19:40:38 by jwe]
Initial revision
author | jwe |
---|---|
date | Thu, 11 Jul 1996 19:40:38 +0000 |
parents | 8b0da674a62d |
children | bc85631e060d |
files | examples/info-emacs-info examples/info-emacs-octave-help |
diffstat | 2 files changed, 27 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
new file mode 100755 --- /dev/null +++ b/examples/info-emacs-info @@ -0,0 +1,14 @@ +#!/bin/sh +# info-emacs-info +# Written by Kurt Hornik <Kurt.Hornik@ci.tuwien.ac.at> on 1996/07/01 +# Make Octave's `help -i' use Emacs info. +# Requires a running Emacs and gnuserv. +cmd="(Info-find-node \"$2\" \"Top\")" +if [ $3 = "--directory" ]; +then + cmd="(add-to-list 'Info-directory-list \"$4\") $cmd" + shift 2 +fi +cmd="(require 'info) $cmd" +[ $4 ] && cmd="$cmd (Info-index \"$4\")" +gnudoit -q $cmd
new file mode 100755 --- /dev/null +++ b/examples/info-emacs-octave-help @@ -0,0 +1,13 @@ +#!/bin/sh +# info-emacs-octave-help +# Written by Kurt Hornik <Kurt.Hornik@ci.tuwien.ac.at> on 1996/07/01 +# Make Octave's `help -i' use Emacs octave-help. +# Requires a running Emacs and gnuserv, and installed `octave.el'. +cmd="(require 'octave)" +if [ $3 = "--directory" ]; +then + cmd="$cmd (add-to-list 'Info-directory-list \"$4\")" + shift 2 +fi +cmd="$cmd (octave-help \"$4\")" +gnudoit -q $cmd