Mercurial > hg > octave-nkf

annotate examples/info-emacs-info @ 6478:4da9255998e3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-03-29 16:31:16 by jwe]
author jwe
date Thu, 29 Mar 2007 16:31:16 +0000
parents 5e881924e645
children 95e9ba7cb502
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2308
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
1 #!/bin/sh
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
2 # info-emacs-info
5428
2a16423e4aa0 [project @ 2005-08-23 18:38:27 by jwe]
jwe
parents: 2308
diff changeset
3 # Written by Kurt Hornik <Kurt.Hornik@wu-wien.ac.at> on 1996/07/01
2308
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
4 # Make Octave's `help -i' use Emacs info.
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
5 # Requires a running Emacs and gnuserv.
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
6 cmd="(Info-find-node \"$2\" \"Top\")"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
7 if [ $3 = "--directory" ];
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
8 then
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
9 cmd="(add-to-list 'Info-directory-list \"$4\") $cmd"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
10 shift 2
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
11 fi
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
12 cmd="(require 'info) $cmd"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
13 [ $4 ] && cmd="$cmd (Info-index \"$4\")"
6478
4da9255998e3 [project @ 2007-03-29 16:31:16 by jwe]
jwe
parents: 6475
diff changeset
14 gnuclient -batch -q -eval "$cmd"