| 1 |
@echo off |
|---|
| 2 |
|
|---|
| 3 |
rem Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008 |
|---|
| 4 |
rem Free Software Foundation, Inc. |
|---|
| 5 |
rem |
|---|
| 6 |
rem Cannot use brackets in andrewi's email below because |
|---|
| 7 |
rem older Windows shells will treat that as redirection. |
|---|
| 8 |
rem |
|---|
| 9 |
rem Author: Andrew Innes andrewi@gnu.org |
|---|
| 10 |
rem |
|---|
| 11 |
rem This file is part of GNU Emacs. |
|---|
| 12 |
rem |
|---|
| 13 |
rem GNU Emacs is free software; you can redistribute it and/or modify |
|---|
| 14 |
rem it under the terms of the GNU General Public License as published by |
|---|
| 15 |
rem the Free Software Foundation; either version 3, or (at your option) |
|---|
| 16 |
rem any later version. |
|---|
| 17 |
rem |
|---|
| 18 |
rem GNU Emacs is distributed in the hope that it will be useful, |
|---|
| 19 |
rem but WITHOUT ANY WARRANTY; without even the implied warranty of |
|---|
| 20 |
rem MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|---|
| 21 |
rem GNU General Public License for more details. |
|---|
| 22 |
rem |
|---|
| 23 |
rem You should have received a copy of the GNU General Public License |
|---|
| 24 |
rem along with GNU Emacs; see the file COPYING. If not, write to the |
|---|
| 25 |
rem Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
|---|
| 26 |
rem Boston, MA 02110-1301, USA. |
|---|
| 27 |
|
|---|
| 28 |
if (%3) == () goto usage |
|---|
| 29 |
if not (%4) == () goto %4 |
|---|
| 30 |
|
|---|
| 31 |
:bin |
|---|
| 32 |
|
|---|
| 33 |
echo Create full bin distribution |
|---|
| 34 |
copy %3\README.W32 emacs-%1\README.W32 |
|---|
| 35 |
rem Info-ZIP zip seems to be broken on Windows. |
|---|
| 36 |
rem It always writes to zip.zip and treats the zipfile argument as one |
|---|
| 37 |
rem of the files to go in it. |
|---|
| 38 |
rem zip -9 -r %2-bin-i386 emacs-%1/BUGS emacs-%1/COPYING emacs-%1/README emacs-%1/README.W32 emacs-%1/INSTALL emacs-%1/bin emacs-%1/etc emacs-%1/info emacs-%1/lisp emacs-%1/leim -x emacs.mdp *.pdb *.opt *~ CVS |
|---|
| 39 |
7z a -tZIP -mx=9 -xr!emacs.mdp -xr!*.pdb -xr!*.opt -xr!*~ -xr!CVS -xr!.arch-inventory %2-bin-i386.zip emacs-%1/BUGS emacs-%1/COPYING emacs-%1/README emacs-%1/README.W32 emacs-%1/INSTALL emacs-%1/bin emacs-%1/etc emacs-%1/info emacs-%1/lisp emacs-%1/leim emacs-%1/site-lisp |
|---|
| 40 |
del emacs-%1\README.W32 |
|---|
| 41 |
if not (%4) == () goto end |
|---|
| 42 |
|
|---|
| 43 |
:barebin |
|---|
| 44 |
echo Create archive with just the basic binaries and generated files |
|---|
| 45 |
echo (the user needs to unpack the full source distribution for |
|---|
| 46 |
echo everything else) |
|---|
| 47 |
copy %3\README.W32 emacs-%1\README.W32 |
|---|
| 48 |
copy %3\dump.bat emacs-%1\bin\dump.bat |
|---|
| 49 |
rem Info-ZIP zip seems to be broken on Windows. |
|---|
| 50 |
rem It always writes to zip.zip and treats the zipfile argument as one |
|---|
| 51 |
rem of the files to go in it. |
|---|
| 52 |
rem zip -9 -r %2-barebin-i386.zip emacs-%1/README.W32 emacs-%1/bin emacs-%1/etc/DOC-X emacs-%1/COPYING |
|---|
| 53 |
7z a -tZIP -mx=9 %2-barebin-i386.zip emacs-%1/README.W32 emacs-%1/bin emacs-%1/etc/DOC-X emacs-%1/COPYING |
|---|
| 54 |
del emacs-%1\README.W32 |
|---|
| 55 |
if not (%4) == () goto end |
|---|
| 56 |
|
|---|
| 57 |
goto end |
|---|
| 58 |
|
|---|
| 59 |
:usage |
|---|
| 60 |
echo Generate source and binary distributions of emacs. |
|---|
| 61 |
echo Usage: %0 emacs-version dist-basename distfiles [bin,barebin] |
|---|
| 62 |
echo (e.g., %0 19.34 emacs-19.34.5 d:\andrewi\distfiles) |
|---|
| 63 |
:end |
|---|
| 64 |
|
|---|
| 65 |
goto skipArchTag |
|---|
| 66 |
arch-tag: 6e2ddd92-c1c9-4992-b6b5-207aaab72f68 |
|---|
| 67 |
:skipArchTag |
|---|
