Branch: Tag:

1997-03-23

1997-03-23 18:38:39 by Henrik Grubbström (Grubba) <grubba@grubba.org>

Added time-stamp to roxen_perror().

Rev: server/etc/include/roxen.pre.pike:1.5.2.3

109:    int lwn;    s=((args==({}))?format:sprintf(format,@args));    if (s=="") return; -  if ( (lwn = s[-1]=="\n") ) +  if ( (lwn = (s[-1]=="\n")) )    s=s[0..strlen(s)-2]; -  werror((perror_last_was_newline?getpid()+": ":"") -  +replace(s,"\n","\n"+getpid()+": ") -  +(lwn?"\n":"")); +  string ts = getpid()+": "+(ctime(time())/" ")[-2]+": "; +  werror((perror_last_was_newline? ts: "")+ +  replace(s, "\n", "\n"+ts)+ +  (lwn?"\n":""));    perror_last_was_newline=lwn;   }