[BACK]Return to make_slots.pl CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / debugging_tools

Diff for /loncom/debugging_tools/make_slots.pl between versions 1.1 and 1.2

version 1.1, 2005/03/21 18:53:51 version 1.2, 2005/03/28 21:51:21
Line 13  $db{'slot1'}= Line 13  $db{'slot1'}=
  'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),   'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),
  'endtime'   => &UnixDate("Aug 30th 01:00:00 2004","%s"),   'endtime'   => &UnixDate("Aug 30th 01:00:00 2004","%s"),
  'ip'        => "*albertelli.com",   'ip'        => "*albertelli.com",
    'proctor'   => 'testuser@annarbor',
     });      });
 $db{'slot2'}=  $db{'slot2'}=
     &freeze_escape({      &freeze_escape({
  'starttime' => &UnixDate("Aug 30th 00:00:00 2006","%s"),   'starttime' => &UnixDate("Aug 30th 00:00:00 2006","%s"),
  'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),   'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),
  'ip'        => "*albertelli.com",   'ip'        => "*albertelli.com",
    'proctor'   => 'testuser@annarbor',
     });      });
 $db{'slot3'}=  $db{'slot3'}=
     &freeze_escape({      &freeze_escape({
  'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),   'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),
  'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),   'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),
  'ip'        => "1.2.3.4",   'ip'        => "1.2.3.4",
    'proctor'   => 'testuser@annarbor',
     });      });
 $db{'slot4'}=  $db{'slot4'}=
     &freeze_escape({      &freeze_escape({
  'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),   'starttime' => &UnixDate("Aug 30th 00:00:00 2004","%s"),
  'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),   'endtime'   => &UnixDate("Aug 30th 00:00:00 2006","%s"),
  'ip'        => "*albertelli.com",   'ip'        => "*albertelli.com",
    'proctor'   => 'testuser@annarbor',
     });      });
   
 sub freeze_escape {  sub freeze_escape {
Removed from v.1.1  
changed lines
  Added in v.1.2

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>