From: Nick J. <nje...@us...> - 2003-04-24 18:40:33
|
Update of /cvsroot/sandweb/sandweb/lib/SandWeb In directory sc8-pr-cvs1:/tmp/cvs-serv658/lib/SandWeb Modified Files: Tag: release-1_0-branch Config.pm Log Message: Merged syntax fixes from HEAD (For Perl 5.8). Index: Config.pm =================================================================== RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Config.pm,v retrieving revision 1.35 retrieving revision 1.35.2.1 diff -U2 -r1.35 -r1.35.2.1 --- Config.pm 14 Jan 2003 09:49:47 -0000 1.35 +++ Config.pm 24 Apr 2003 18:40:24 -0000 1.35.2.1 @@ -350,6 +350,6 @@ my %data = (); - $data{'personal'} = ( %$self->{'personal'} ); - $data{'repo'} = ( %$self->{'repo'} ); + $data{'personal'} = $self->{'personal'}; + $data{'repo'} = $self->{'repo'}; open(F, ">$config_dir/$config_file") or |