Mercurial > hg > xemacs-beta
annotate netinstall/tar.h @ 4448:fd8a9a4d81d9
Support #!, to allow XEmacs to be called as a script interpreter.
ChangeLog addition:
2008-01-20 Aidan Kehoe <kehoea@parhasard.net>
* Makefile.in.in (SHEBANG_PROGNAME):
New variable; a symbol link to the XEmacs binary to tell it it
should read a script from stdin.
* configure.ac (XE_EXPAND_VARIABLE):
Set SHEBANG_PROGNAME.
* configure:
Regenerate.
src/ChangeLog addition:
2008-01-20 Aidan Kehoe <kehoea@parhasard.net>
* config.h.in: Add SHEBANG_PROGNAME.
* emacs.c (main_1):
If we've been called using SHEBANG_PROGNAME, rewrite our arguments
to add a --script argument.
Also, handle the --script argument by setting noninteractive and
vanilla.
* lread.c (Fload_internal):
If the first two characters of a file are #!, replace them with ;!
before they get to the Lisp reader.
lisp/ChangeLog addition:
2008-01-20 Aidan Kehoe <kehoea@parhasard.net>
* startup.el (command-line-do-script): New.
(command-switch-alist): Use command-line-do-script.
New argument, compatible with GNU; --script or -script says "treat
the following argument as a file to load in batch mode".
man/ChangeLog addition:
2008-01-20 Aidan Kehoe <kehoea@parhasard.net>
* xemacs/cmdargs.texi (Command Switches):
Describe --script, -script.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Sun, 20 Jan 2008 19:53:54 +0100 |
| parents | 3078fd1074e8 |
| children |
| rev | line source |
|---|---|
| 448 | 1 /* |
| 2 * Copyright (c) 2000, Red Hat, Inc. | |
| 3 * | |
| 4 * This program is free software; you can redistribute it and/or modify | |
| 5 * it under the terms of the GNU General Public License as published by | |
| 6 * the Free Software Foundation; either version 2 of the License, or | |
| 7 * (at your option) any later version. | |
| 8 * | |
| 9 * A copy of the GNU General Public License can be found at | |
| 10 * http://www.gnu.org/ | |
| 11 * | |
| 12 * Written by DJ Delorie <dj@cygnus.com> | |
| 13 * | |
| 14 */ | |
| 15 | |
| 16 #ifndef __TAR_H_ | |
| 17 #define __TAR_H_ | |
| 18 | |
| 19 /* Only one tarfile may be open at a time. gzipped files handled | |
| 20 automatically */ | |
| 21 | |
| 22 /* returns zero on success, nonzero on failure */ | |
| 23 int tar_open (char *pathname); | |
| 24 | |
| 25 /* returns pointer to static buf containing name of next file */ | |
| 26 char * tar_next_file (); | |
| 27 | |
| 28 /* byte position in [compressed] file */ | |
| 29 int tar_ftell (); | |
| 30 | |
| 31 /* pass adjusted path, returns zero on success, nonzero on failure */ | |
| 32 int tar_read_file (char *path); | |
| 33 | |
| 34 /* closes the file */ | |
| 35 int tar_close (); | |
| 36 | |
| 37 /* pass path to tar file and from/to pairs for path prefix (NULLs at | |
| 38 end , returns zero if completely successful, nonzero (counts | |
| 39 errors) on failure */ | |
| 40 int tar_auto (char *pathname, char **map); | |
| 41 | |
| 42 int tar_mkdir_p (int isadir, char *path); | |
| 43 | |
| 44 /* | |
| 45 extern int _tar_verbose; | |
| 46 extern FILE * _tar_vfile; | |
| 47 */ | |
| 48 | |
| 49 #endif |