code.delx.au - gnu-emacs/blob - nt/multi-install-info.bat

   1 @echo off
   2
   3 rem  Hack to run install-info with multiple info files on the command
   4 rem  line on the Windows platform.
   5
   6 rem Copyright (C) 2003-2011
   7 rem    Free Software Foundation, Inc.
   8
   9 rem  This file is part of GNU Emacs.
  10
  11 rem   GNU Emacs is free software: you can redistribute it and/or modify
  12 rem   it under the terms of the GNU General Public License as published by
  13 rem   the Free Software Foundation, either version 3 of the License, or
  14 rem   (at your option) any later version.
  15
  16 rem   GNU Emacs is distributed in the hope that it will be useful,
  17 rem   but WITHOUT ANY WARRANTY; without even the implied warranty of
  18 rem   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19 rem   GNU General Public License for more details.
  20
  21 rem   You should have received a copy of the GNU General Public License
  22 rem   along with GNU Emacs.  If not, see http://www.gnu.org/licenses/.
  23
  24
  25 rem  Usage:
  26 rem   multi-install-info <switch passed to install-info> FILE1 FILE2 ...
  27 rem
  28 rem  By Peter 'Luna' Runestig <peter@runestig.com> 2003
  29
  30 set INSTALL_INFO=install-info
  31 set II_SWITCH=%1=%2
  32 rem Eat the install-info switch:
  33 shift
  34
  35 :Loop
  36 shift
  37 if .%1% == . goto EndLoop
  38 %INSTALL_INFO% %II_SWITCH% %1
  39 goto Loop
  40 :EndLoop
  41