Update of /cvsroot/sandweb/sandweb/lib/SandWeb
In directory usw-pr-cvs1:/tmp/cvs-serv12800/lib/SandWeb
Modified Files:
Browse.pm
Log Message:
merging changes
Index: Browse.pm
===================================================================
RCS file: /cvsroot/sandweb/sandweb/lib/SandWeb/Browse.pm,v
retrieving revision 1.42
retrieving revision 1.43
diff -U2 -r1.42 -r1.43
--- Browse.pm 2002/02/05 05:25:14 1.42
+++ Browse.pm 2002/02/05 06:20:47 1.43
@@ -79,14 +79,13 @@
$count++;
}
+
foreach my $link (@location_link) {
my %row_data;
if ( $link ) {
- $link =~ s/$\ /$1/;
$row_data{LOCATION_LINK} = "[$link]";
}
my $data = join(" ", @location_full);
- $data =~ s/$\ /$1/;
if ($location_link[$count]) {
push (@location_full, "/$location_link[$count]");
|