--- loncom/debugging_tools/make_slots.pl 2005/03/21 18:53:51 1.1 +++ loncom/debugging_tools/make_slots.pl 2005/03/28 21:51:21 1.2 @@ -13,24 +13,28 @@ $db{'slot1'}= 'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"), 'endtime' => &UnixDate("Aug 30th 01:00:00 2004","%s"), 'ip' => "*albertelli.com", + 'proctor' => 'testuser@annarbor', }); $db{'slot2'}= &freeze_escape({ 'starttime' => &UnixDate("Aug 30th 00:00:00 2006","%s"), 'endtime' => &UnixDate("Aug 30th 00:00:00 2006","%s"), 'ip' => "*albertelli.com", + 'proctor' => 'testuser@annarbor', }); $db{'slot3'}= &freeze_escape({ 'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"), 'endtime' => &UnixDate("Aug 30th 00:00:00 2006","%s"), 'ip' => "1.2.3.4", + 'proctor' => 'testuser@annarbor', }); $db{'slot4'}= &freeze_escape({ 'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"), 'endtime' => &UnixDate("Aug 30th 00:00:00 2006","%s"), 'ip' => "*albertelli.com", + 'proctor' => 'testuser@annarbor', }); sub freeze_escape {