/[Frey]/branches/zimbardo/lib/Frey/Web.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /branches/zimbardo/lib/Frey/Web.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 398 by dpavlin, Tue Nov 18 02:14:40 2008 UTC revision 407 by dpavlin, Tue Nov 18 12:02:57 2008 UTC
# Line 170  sub error { Line 170  sub error {
170          my ($package, $filename, $line) = caller;          my ($package, $filename, $line) = caller;
171          $error .= " at $filename line $line" if $error !~ m{ at };          $error .= " at $filename line $line" if $error !~ m{ at };
172          warn "WARN: $error\n";          warn "WARN: $error\n";
173          $error =~ s{at\s+(\S+)\s+line\s+(\d+)}{at <a href="/editor$1+$2" target="editor">$1</a> line $2}gsm;          $error =~ s{at\s+(\S+)\s+line\s+(\d+)}{at <a target="editor" href="/editor+$1+$2">$1</a> line $2}gsm;
174          return qq|<pre class="frey-error">$error</pre>|;          return qq|<pre class="frey-error">$error</pre>|;
175  }  }
176    
Legend:
Removed from v.398  
changed lines
  Added in v.407
  ViewVC Help
Powered by ViewVC 1.1.26