View | Details | Raw Unified | Return to bug 9288
Collapse All | Expand All

(-)a/misc/sip_cli_emulator.pl (-1 / +3 lines)
Lines 49-54 if ( $help Link Here
49
49
50
$terminator = ( $terminator eq 'CR' ) ? $CR : $CRLF;
50
$terminator = ( $terminator eq 'CR' ) ? $CR : $CRLF;
51
51
52
# Set perl to expect the same record terminator it is sending
53
$/ = $terminator;
54
52
my ( $sec, $min, $hour, $day, $month, $year ) = localtime(time);
55
my ( $sec, $min, $hour, $day, $month, $year ) = localtime(time);
53
$year += 1900;
56
$year += 1900;
54
my $transaction_date = "$year$month$day    $hour$min$sec";
57
my $transaction_date = "$year$month$day    $hour$min$sec";
55
- 

Return to bug 9288