code.delx.au - gnu-emacs/blob - nt/envadd.bat

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