[1985] in Moira

home help back first fref pref prev next nref lref last post

Re: calendar.gen change

daemon@ATHENA.MIT.EDU (Mark Silis)
Thu Aug 22 03:39:30 2002

Date: Thu, 22 Aug 2002 03:39:26 -0400
From: Mark Silis <mark@MIT.EDU>
To: Garry Zacheiss <zacheiss@MIT.EDU>
Cc: moiradev@MIT.EDU, mark@MIT.EDU
Message-ID: <20020822073926.GA28771@I-fear-reorgs.mit.edu>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
In-Reply-To: <200208161530.LAA15592@riff-raff.mit.edu>

Sorry about this, but a requirement about how old entry information needs to
be removed has been changed, so I also need the following change please.

-- Mark

Index: calendar.gen
===================================================================
RCS file: /afs/.athena/astaff/project/moiradev/repository/moira/gen/calendar.gen,v
retrieving revision 1.1
diff -u -r1.1 calendar.gen
--- calendar.gen	2002/05/19 21:53:39	1.1
+++ calendar.gen	2002/08/22 07:34:35
@@ -26,8 +26,8 @@
 open(OUT, ">$outfile") || exit $MR_OCONFIG;
 
 while (($clearid, $login, $first, $middle, $last) = $sth->fetchrow_array) {
-    $row = "$clearid^UID=$login/S=$last/G=$first/I=$middle/";
-    $row .= "EMAIL=$login\@mit.edu\n";
+    $row = "$clearid|$login^UID=$login/S=$last/G=$first/I=$middle/";
+    $row .= "OU1=/JOB-TITLE=/PHONE=/LOC=/EMAIL=$login\@mit.edu\n";
     $row =~ s/\0//g;
     print OUT $row;
 }

home help back first fref pref prev next nref lref last post