6491
|
1 #! /bin/sh |
2308
|
2 # info-emacs-info |
7019
|
3 # |
|
4 # Copyright (C) 1996, 2005, 2007 Kurt Hornik |
|
5 # |
|
6 # This file is part of Octave. |
|
7 # |
|
8 # Octave is free software; you can redistribute it and/or modify it |
|
9 # under the terms of the GNU General Public License as published by the |
|
10 # Free Software Foundation; either version 3 of the License, or (at |
|
11 # your option) any later version. |
|
12 # |
|
13 # Octave is distributed in the hope that it will be useful, but WITHOUT |
|
14 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
15 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License |
|
16 # for more details. |
|
17 # |
|
18 # You should have received a copy of the GNU General Public License |
|
19 # along with Octave; see the file COPYING. If not, see |
|
20 # <http://www.gnu.org/licenses/>. |
|
21 |
5428
|
22 # Written by Kurt Hornik <Kurt.Hornik@wu-wien.ac.at> on 1996/07/01 |
7019
|
23 |
2308
|
24 # Make Octave's `help -i' use Emacs info. |
|
25 # Requires a running Emacs and gnuserv. |
|
26 cmd="(Info-find-node \"$2\" \"Top\")" |
|
27 if [ $3 = "--directory" ]; |
|
28 then |
|
29 cmd="(add-to-list 'Info-directory-list \"$4\") $cmd" |
|
30 shift 2 |
|
31 fi |
|
32 cmd="(require 'info) $cmd" |
|
33 [ $4 ] && cmd="$cmd (Info-index \"$4\")" |
6478
|
34 gnuclient -batch -q -eval "$cmd" |