Changeset 770

Timestamp:

11/18/08 03:33:32 (3 years ago)

Author:

SvenDowideit

Message:

Item212: don't assume PubUrlPath isn't set to a url

Location:

trunk

Files:

• DistributedServersPlugin/lib/TWiki/Plugins/DistributedServersPlugin.pm (modified) (2 diffs)
• SmiliesPlugin/lib/TWiki/Plugins/SmiliesPlugin.pm (modified) (1 diff)

trunk/DistributedServersPlugin/lib/TWiki/Plugins/DistributedServersPlugin.pm

@@ -65 +65 @@
     #my $text = shift;
     my $pubCDNMap = $TWiki::cfg{Plugins}{DistributedServersPlugin}{CDNMap};
-print STDERR  $TWiki::cfg{Plugins}{DistributedServersPlugin}{CDNMap};
     foreach my $from ( keys(%{$pubCDNMap}) ) {
-print STDERR "cdn? $from";
-        $_[0] =~ s|($from)|pubCDN($1)|ge;
+#        $_[0] =~ s|($from)|pubCDN($1)|ge;
     }
 }
@@ -78 +76 @@
     $pubCDNIndex = 0 if ( $pubCDNIndex >= scalar( @{ $pubCDNMap->{$fromUrl} } ) );
 
+print STDERR "$fromUrl ->  $url";
+
     return $url;
 }

trunk/SmiliesPlugin/lib/TWiki/Plugins/SmiliesPlugin.pm

@@ -76 +76 @@
     $allPattern .= ")";
     $smiliesPubUrl =
-      TWiki::Func::getUrlHost() . TWiki::Func::getPubUrlPath() .
+      TWiki::Func::getPubUrlPath() .
           "/$installWeb/SmiliesPlugin";