annotate examples/info-emacs-info @ 8710:739141cde75a ss-3-1-52

fix typo in Array-f.cc
author Jaroslav Hajek <highegg@gmail.com>
date Mon, 09 Feb 2009 21:51:31 +0100
parents 4270ded9ddc6
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6491
95e9ba7cb502 [project @ 2007-04-05 03:12:54 by jwe]
jwe
parents: 6478
diff changeset
1 #! /bin/sh
2308
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
2 # info-emacs-info
7019
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
3 #
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
4 # Copyright (C) 1996, 2005, 2007 Kurt Hornik
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
5 #
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
6 # This file is part of Octave.
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
7 #
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
8 # Octave is free software; you can redistribute it and/or modify it
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
9 # under the terms of the GNU General Public License as published by the
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
10 # Free Software Foundation; either version 3 of the License, or (at
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
11 # your option) any later version.
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
12 #
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
13 # Octave is distributed in the hope that it will be useful, but WITHOUT
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
14 # ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
15 # FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
16 # for more details.
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
17 #
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
18 # You should have received a copy of the GNU General Public License
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
19 # along with Octave; see the file COPYING. If not, see
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
20 # <http://www.gnu.org/licenses/>.
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
21
5428
2a16423e4aa0 [project @ 2005-08-23 18:38:27 by jwe]
jwe
parents: 2308
diff changeset
22 # Written by Kurt Hornik <Kurt.Hornik@wu-wien.ac.at> on 1996/07/01
7019
4270ded9ddc6 [project @ 2007-10-13 01:42:20 by jwe]
jwe
parents: 6491
diff changeset
23
2308
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
24 # Make Octave's `help -i' use Emacs info.
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
25 # Requires a running Emacs and gnuserv.
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
26 cmd="(Info-find-node \"$2\" \"Top\")"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
27 if [ $3 = "--directory" ];
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
28 then
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
29 cmd="(add-to-list 'Info-directory-list \"$4\") $cmd"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
30 shift 2
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
31 fi
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
32 cmd="(require 'info) $cmd"
2aa0453bfea3 [project @ 1996-07-11 19:40:38 by jwe]
jwe
parents:
diff changeset
33 [ $4 ] && cmd="$cmd (Info-index \"$4\")"
6478
4da9255998e3 [project @ 2007-03-29 16:31:16 by jwe]
jwe
parents: 6475
diff changeset
34 gnuclient -batch -q -eval "$cmd"