![[BACK]](/icons/back.gif){kind=icon}
Return to lonnavmaps.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface|
Return to lonnavmaps.pm CVS log | Up to [LON-CAPA] / loncom / interface |
| version 1.332, 2005/06/28 21:41:43 | version 1.333, 2005/07/06 18:07:02 |
|---|---|
| Line 660 sub timeToHumanString { | Line 660 sub timeToHumanString { |
| my $timeStr = strftime("%A, %b %e at %I:%M %P", localtime($time)); | my $timeStr = strftime("%A, %b %e at %I:%M %P", localtime($time)); |
| $timeStr =~ s/12:00 am/00:00/; | $timeStr =~ s/12:00 am/00:00/; |
| $timeStr =~ s/12:00 pm/noon/; | $timeStr =~ s/12:00 pm/noon/; |
| return ($inPast ? "last " : "next ") . | return ($inPast ? "last " : "this ") . |
| $timeStr; | $timeStr; |
| } | } |