projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
b953903
)
make sure multiple PC92 have the correct TS on them (!)
author
minima
<minima>
Mon, 8 Jan 2007 00:18:40 +0000
(
00:18
+0000)
committer
minima
<minima>
Mon, 8 Jan 2007 00:18:40 +0000
(
00:18
+0000)
perl/DXProtHandle.pm
patch
|
blob
|
history
diff --git
a/perl/DXProtHandle.pm
b/perl/DXProtHandle.pm
index fc05280a92afd22317cce66601e064478fcd3caf..59c1351cd274666de7ee561961c6dc2335394f5c 100644
(file)
--- a/
perl/DXProtHandle.pm
+++ b/
perl/DXProtHandle.pm
@@
-1342,7
+1342,7
@@
sub gen_pc9x_t
return $_last_time - $main::systime_daystart;
} else {
$_last_occurs++;
return $_last_time - $main::systime_daystart;
} else {
$_last_occurs++;
- return sprintf "
$_last_time.%02d"
, $_last_occurs;
+ return sprintf "
%d.%02d", $_last_time - $main::systime_daystart
, $_last_occurs;
}
}
}
}
@@
-1395,8
+1395,7
@@
sub handle_92
return;
}
return;
}
- my $parent = check_pc9x_t($pcall, $t, 92, 1);
- return unless $parent;
+ my $parent = check_pc9x_t($pcall, $t, 92, 1) || return;
$parent->lastid->{92} = $t;
$parent->do_pc92(1);
$parent->lastid->{92} = $t;
$parent->do_pc92(1);