blob: bad336590dfa288d19ad780e81c0703d5b599852 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
--- a/src/tclspice.c
+++ b/src/tclspice.c
@@ -828,10 +828,9 @@
int i;
NG_IGNORE(clientData);
save_interp();
- /* Looks backwards through the first command and strips the :: part */
- for (i = strlen(argv[0])-1; i > 0; i--)
- if (argv[0][i] == *":")
- argv[0] += i + 1;
+ char *prefix = strstr(argv[0], "spice::");
+ if (prefix)
+ argv[0] = prefix + 7;
return _run(argc, (char **)argv);
}
|