--- loncom/lcnfson	2000/11/02 22:05:02	1.2
+++ loncom/lcnfson	2007/08/22 19:53:22	1.5
@@ -1,10 +1,14 @@
 #!/usr/bin/perl
 
-# Scott Harrison
-# SH: November 2, 2000
-
 use strict;
 
+# $Id: lcnfson,v 1.5 2007/08/22 19:53:22 albertel Exp $
+
+# This script is a setuid script (chmod 6755; chown root:root).
+# It enables nfs/portmap services for a specific user at
+# a specific ip address.
+
+# Exit codes.  0=ok.  Higher than 0 means something went wrong.
 # Usage within code
 #
 # $exitcode=system("/home/httpd/perl/lcuseradd","NAME","IPADDRESS")/256;