view nt/envadd.bat @ 111183:72ef880ed198

Let ns load common-win. * lisp/term/common-win.el (x-select-enable-clipboard): * lisp/term/pc-win.el (x-select-enable-clipboard): Doc fix. * lisp/term/ns-win.el: No need to require cl when compiling. (x-display-name, x-setup-function-keys, x-select-text, x-colors) (xw-defined-colors): Use the common-win definitions. (ns-alternatives-map): Make it an obsolete alias for x-alternatives-map. (ns-handle-iconic): Make it an alias for x-handle-iconic. * lisp/term/common-win.el (x-select-text, x-alternatives-map) (x-setup-function-keys, x-colors, xw-defined-colors): Handle 'ns case. * lisp/loadup.el [ns]: Load common-win.
author Glenn Morris <rgm@gnu.org>
date Mon, 25 Oct 2010 19:59:05 -0700
parents 1d1d5d9bd884
children 376148b31b5e
line wrap: on
line source

rem  Hack to change/add environment variables in the makefiles for the
rem  Windows platform.

rem  Copyright (C) 2003, 2004, 2005, 2006, 2007, 2008, 2009, 2010
rem    Free Software Foundation, Inc.

rem  This file is part of GNU Emacs.

rem  GNU Emacs is free software: you can redistribute it and/or modify
rem  it under the terms of the GNU General Public License as published by
rem  the Free Software Foundation, either version 3 of the License, or
rem  (at your option) any later version.

rem  GNU Emacs is distributed in the hope that it will be useful,
rem  but WITHOUT ANY WARRANTY; without even the implied warranty of
rem  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
rem  GNU General Public License for more details.

rem  You should have received a copy of the GNU General Public License
rem  along with GNU Emacs.  If not, see http://www.gnu.org/licenses/.


rem  Usage:
rem    envadd "ENV1=VAL1" "ENV2=VAL2" ... /C <command line>
rem
rem  The "/C" switch marks the end of environment variables, and the
rem  beginning of the command line.
rem
rem  By Peter 'Luna' Runestig <peter@runestig.com> 2003

:Loop
if .%1% == ./C goto EndLoop
rem just to avoid an endless loop:
if .%1% == . goto EndLoop
set %1
shift
goto Loop
:EndLoop

rem Eat the "/C"
shift
rem Now, run the command line
%1 %2 %3 %4 %5 %6 %7 %8 %9

goto skipArchTag
   arch-tag: 148c5181-dbce-43ae-bba6-1cc6e2a9ea75
:skipArchTag