Diff for /loncom/ConfigFileEdit.pm between versions 1.2 and 1.3

version 1.2, 2003/12/02 12:06:25 version 1.3, 2003/12/30 11:28:51
Line 313  sub Write { Line 313  sub Write {
     }         }   
 }  }
   
   #   Get:
   #      return the entire contents of the file as a string.
   # Parameters:
   #    $self      - (this).
   #
   sub Get {
       my $self    = shift;
       
       my $contents = "";
       my $lines    = $self->{LineArray};
       my $length   = @$lines;
   
       for (my $i = 0; $i < $length; $i++) {
    $contents .= $lines->[$i]."\n";
       }
       return $contents;
   }
   
 1;  1;
 #----------------------------- Documentation --------------------------------------  #----------------------------- Documentation --------------------------------------
 #  #
Line 427  Writes the contents of the configuration Line 445  Writes the contents of the configuration
   
 =back  =back
   
   =head2 Get ()
   
   Return the entire contents of the configuration file as a single string.
   
 =head2 Comment ( line )  =head2 Comment ( line )
   
 Static member that returns true if the line passed in is a comment or blank line.  Static member that returns true if the line passed in is a comment or blank line.
Line 443  Static member that returns the value of Line 465  Static member that returns the value of
   
 =back  =back
   
   
   
 =head2 Index ( linearray, fieldno )  =head2 Index ( linearray, fieldno )
   
 Returns a reference to a hash that indexes a line array by a particular field number.  Returns a reference to a hash that indexes a line array by a particular field number.

Removed from v.1.2  
changed lines
  Added in v.1.3


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