--- lib/TWiki/Contrib/Publish.pm.orig	Thu Apr 28 12:42:01 2005
+++ lib/TWiki/Contrib/Publish.pm	Mon Oct 17 16:13:22 2005
@@ -192,7 +192,8 @@
                                    $exclusions, $skin, $topicsearch,
                                    "$PUBLISH_DIR/$zipfilename");
 
-        my $text = "Published at $PUBLISH_URL/$zipfilename";
+        #my $text = "Published at $PUBLISH_URL/$zipfilename";
+        my $text = "Published at $PUBLISH_URL ([[$PUBLISH_URL/$zipfilename][ZIP file here]])";
         $text = TWiki::Func::expandCommonVariables( $text, $topic, $web );
         $text = TWiki::Func::renderText( $text, $web );
         print $text;
@@ -241,6 +242,7 @@
     }
 
     $zip->writeToFileNamed( $destZip );
+    `unzip -o $destZip -d $PUBLISH_DIR`;
 
     return 1;
 }