Commit aeed9520 authored by Leigh B. Stoller's avatar Leigh B. Stoller
Browse files

As per Jay's request, change the message at the top of the activity log

to include the date and the experiment index.
parent e244219f
...@@ -14,7 +14,7 @@ use Exporter; ...@@ -14,7 +14,7 @@ use Exporter;
qw ( SENDMAIL OPENMAIL TBTimeStamp TBBackGround TBDateTimeFSSafe qw ( SENDMAIL OPENMAIL TBTimeStamp TBBackGround TBDateTimeFSSafe
TBMakeLogname TB_BOSSNODE TB_OPSEMAIL TBGenSecretKey TBDebugTimeStamp TBMakeLogname TB_BOSSNODE TB_OPSEMAIL TBGenSecretKey TBDebugTimeStamp
TBDebugTimeStampsOn TBForkCmd TB_BOSSEVENTPORT TB_EVENTSERVER TBDebugTimeStampsOn TBForkCmd TB_BOSSEVENTPORT TB_EVENTSERVER
TBScriptLock TBScriptUnlock TBScriptLock TBScriptUnlock TBTimeStampWithDate
TBSCRIPTLOCK_OKAY TBSCRIPTLOCK_TIMEDOUT TBSCRIPTLOCK_OKAY TBSCRIPTLOCK_TIMEDOUT
TBSCRIPTLOCK_IGNORE TBSCRIPTLOCK_FAILED); TBSCRIPTLOCK_IGNORE TBSCRIPTLOCK_FAILED);
...@@ -161,6 +161,11 @@ sub TBTimeStamp() ...@@ -161,6 +161,11 @@ sub TBTimeStamp()
return POSIX::strftime("%H:%M:%S", localtime($seconds)) . ":$microseconds"; return POSIX::strftime("%H:%M:%S", localtime($seconds)) . ":$microseconds";
} }
sub TBTimeStampWithDate()
{
return POSIX::strftime("%m/%d/20%y %H:%M:%S", localtime());
}
# #
# Another routine for creating a file name based on the current date and # Another routine for creating a file name based on the current date and
# time. The format is slightly different so that it can be a proper filename. # time. The format is slightly different so that it can be a proper filename.
......
...@@ -160,8 +160,11 @@ TBDebugTimeStampsOn(); ...@@ -160,8 +160,11 @@ TBDebugTimeStampsOn();
# #
# Print starting message. # Print starting message.
# #
my $exptidx;
TBExptIDX($pid, $eid, \$exptidx);
print "Beginning swap-$swapop for $pid/$eid. " . TBTimeStamp() . "\n"; print "Beginning swap-$swapop for $pid/$eid ($exptidx). " .
TBTimeStampWithDate() . "\n";
TBDebugTimeStamp("tbswap $swapop started"); TBDebugTimeStamp("tbswap $swapop started");
# #
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment