HCoop
/
bpt
/
guile.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f839230
)
* script.c (scm_compile_shell_switches): If we hit the -c or --
author
Jim Blandy
<jimb@red-bean.com>
Sun, 28 Sep 1997 03:13:36 +0000
(
03:13
+0000)
committer
Jim Blandy
<jimb@red-bean.com>
Sun, 28 Sep 1997 03:13:36 +0000
(
03:13
+0000)
arguments, don't set the car of (command-line) to scm_usage_name,
the prettified name of the guile executable; give it the full
path, the way shells usually handle $0.
libguile/script.c
patch
|
blob
|
blame
|
history
diff --git
a/libguile/script.c
b/libguile/script.c
index
6eee76b
..
859746a
100644
(file)
--- a/
libguile/script.c
+++ b/
libguile/script.c
@@
-461,7
+461,7
@@
scm_compile_shell_switches (int argc, char **argv)
int interactive = 1; /* Should we go interactive when done? */
int use_emacs_interface = 0;
int i;
- char *argv0;
+ char *argv0
= argv[0]
;
if (argc > 0)
{
@@
-473,7
+473,6
@@
scm_compile_shell_switches (int argc, char **argv)
}
if (! scm_usage_name)
scm_usage_name = "guile";
- argv0 = scm_usage_name;
for (i = 1; i < argc; i++)
{