ossp-pkg/shiela/shiela.pl 1.47 -> 1.48
--- shiela.pl 2002/12/23 14:21:57 1.47
+++ shiela.pl 2002/12/23 14:33:55 1.48
@@ -859,15 +859,15 @@
foreach my $file (keys(%{$IN->{file}})) {
my $e = $IN->{file}->{$file};
$O .= $IN->{handle};
- $O .= ",".$RT->{userid};
- $O .= ",".$file;
- $O .= ",".$e->{oldrev};
- $O .= ",".$e->{newrev};
- $O .= ",".$e->{branch};
- $O .= ",".$e->{op};
- $O .= ",".$e->{keysub};
- $O .= ",".$e->{date};
- $O .= ",".$e->{delta};
+ $O .= "|".$RT->{userid};
+ $O .= "|".$file;
+ $O .= "|".$e->{oldrev};
+ $O .= "|".$e->{newrev};
+ $O .= "|".$e->{branch};
+ $O .= "|".$e->{op};
+ $O .= "|".$e->{keysub};
+ $O .= "|".$e->{date};
+ $O .= "|".$e->{delta};
$O .= "\n";
}
my $io = new IO::File ">>".$RT->{historydb}
|
|