Mercurial > emacs
annotate nt/envadd.bat @ 94068:f2cff391663b
(minibuffer-try-completion, minibuffer-all-completions): Fix last change.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 14 Apr 2008 03:30:47 +0000 |
| parents | e27f17d9c8ed |
| children | 188974bfdea0 |
| rev | line source |
|---|---|
| 52423 | 1 rem Hack to change/add environment variables in the makefiles for the |
| 2 rem Windows platform. | |
| 3 rem | |
| 79730 | 4 rem Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc. |
| 52423 | 5 rem |
| 6 rem This file is part of GNU Emacs. | |
| 7 rem | |
| 8 rem GNU Emacs is free software; you can redistribute it and/or modify | |
| 9 rem it under the terms of the GNU General Public License as published by | |
|
78246
075eb71f218d
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75348
diff
changeset
|
10 rem the Free Software Foundation; either version 3, or (at your option) |
| 52423 | 11 rem any later version. |
| 12 rem | |
| 13 rem GNU Emacs is distributed in the hope that it will be useful, | |
| 14 rem but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 15 rem MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 16 rem GNU General Public License for more details. | |
| 17 rem | |
| 18 rem You should have received a copy of the GNU General Public License | |
| 19 rem along with GNU Emacs; see the file COPYING. If not, write to | |
| 64083 | 20 rem the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 21 rem Boston, MA 02110-1301, USA. | |
| 52423 | 22 rem |
| 23 rem | |
| 24 rem Usage: | |
| 25 rem envadd "ENV1=VAL1" "ENV2=VAL2" ... /C <command line> | |
| 26 rem | |
| 27 rem The "/C" switch marks the end of environment variables, and the | |
| 28 rem beginning of the command line. | |
| 29 rem | |
| 30 rem By Peter 'Luna' Runestig <peter@runestig.com> 2003 | |
| 31 | |
| 32 :Loop | |
| 33 if .%1% == ./C goto EndLoop | |
| 34 rem just to avoid an endless loop: | |
| 35 if .%1% == . goto EndLoop | |
| 36 set %1 | |
| 37 shift | |
| 38 goto Loop | |
| 39 :EndLoop | |
| 40 | |
| 41 rem Eat the "/C" | |
| 42 shift | |
| 43 rem Now, run the command line | |
| 44 %1 %2 %3 %4 %5 %6 %7 %8 %9 | |
| 52428 | 45 |
| 46 goto skipArchTag | |
| 47 arch-tag: 148c5181-dbce-43ae-bba6-1cc6e2a9ea75 | |
| 48 :skipArchTag |
