Normalisierung prg geaendert.
Bei der Normalisierung des Programms Spezialfaelle
beruecksichtigen, z.B. dass prg "#'call_out" sein kann.
Change-Id: I8903d7091d6ed5567239367a29c78d386fde653d
diff --git a/secure/errord.c b/secure/errord.c
index 3faf424..e9b3f5c 100644
--- a/secure/errord.c
+++ b/secure/errord.c
@@ -375,7 +375,7 @@
issue->loc = err[F_LINE];
// Normalisieren auf fuehrenden / und kein .c
if (err[F_PROG]!="unbekannt")
- issue->prog = load_name(err[F_PROG]);
+ issue->prog=err[F_PROG][0] in "/#<" ? err[F_PROG] : "/" + err[F_PROG];
else
issue->prog = "unbekannt";
issue->titp = getuid(this_interactive() || this_player());
@@ -467,7 +467,7 @@
// prg und curobj auf fuehrenden / und ohne .c am Ende normieren.
if (stringp(prg))
- issue->prog = load_name(prg);
+ issue->prog=prg[0] in "/#<" ? prg : "/" + prg;
if (stringp(curobj) && curobj[0]!='/')
{
curobj="/"+curobj;
@@ -610,9 +610,10 @@
//d.h. load_name() 0 liefert.
issue->loadname="<Illegal object name>";
- // prg und curobj auf abs. Pfade normalisieren.
+ // prg und curobj auf abs. Pfade normalisieren. Dabei Spezialfaelle
+ // beruecksichtigen, z.B. dass prg "#'call_out" sein kann.
if (stringp(prg))
- issue->prog=load_name(prg);
+ issue->prog=prg[0] in "/#<" ? prg : "/" + prg;
if (stringp(curobj) && curobj[0]!='/')
{
curobj="/"+curobj;