Index: bin/attach
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/attach,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/attach	2000/06/02 15:05:17	1.1
--- bin/attach	2000/06/02 17:35:52	1.2
***************
*** 65,71 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 65,71 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/changes
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/changes,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/changes	2000/06/02 15:05:17	1.1
--- bin/changes	2000/06/02 17:35:52	1.2
***************
*** 34,40 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $dummy1, $dummy2, $dataDir ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 34,40 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $dummy1, $dummy2, $dataDir ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/delete
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/delete,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/delete	2000/06/02 15:05:17	1.1
--- bin/delete	2000/06/02 17:35:52	1.2
***************
*** 29,35 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $scriptUrlPath ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 29,35 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $scriptUrlPath ) = 
          &wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/edit
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/edit,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/edit	2000/06/02 15:05:17	1.1
--- bin/edit	2000/06/02 17:35:52	1.2
***************
*** 139,145 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' ) || "";
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $scriptUrlPath, $userName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 139,145 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' ) || "";
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $scriptUrlPath, $userName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/oops
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/oops,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/oops	2000/06/02 15:05:18	1.1
--- bin/oops	2000/06/02 17:35:53	1.2
***************
*** 31,37 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 31,37 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/preview
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/preview,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/preview	2000/06/02 15:05:18	1.1
--- bin/preview	2000/06/02 17:35:53	1.2
***************
*** 115,121 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
      ( $topic, $webName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
  
--- 115,121 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
      ( $topic, $webName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
  
Index: bin/rdiff
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/rdiff,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/rdiff	2000/06/02 15:05:18	1.1
--- bin/rdiff	2000/06/02 17:35:53	1.2
***************
*** 109,115 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param('topic');
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 109,115 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param('topic');
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/register
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/register,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/register	2000/06/02 15:05:18	1.1
--- bin/register	2000/06/02 17:35:53	1.2
***************
*** 69,75 ****
  
      my $topicName = $query->param( 'TopicName' );
      my $thePathInfo = $query->path_info(); 
!     my $theUrl = $query->url;
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $wikiName, $topicName, $theUrl );
  
--- 69,75 ----
  
      my $topicName = $query->param( 'TopicName' );
      my $thePathInfo = $query->path_info(); 
!     my $theUrl = $query->url(-relative=>1);
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $wikiName, $topicName, $theUrl );
  
Index: bin/save
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/save,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/save	2000/06/02 15:05:18	1.1
--- bin/save	2000/06/02 17:35:53	1.2
***************
*** 32,38 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 32,38 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/search
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/search,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/search	2000/06/02 15:05:18	1.1
--- bin/search	2000/06/02 17:35:53	1.2
***************
*** 29,35 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 29,35 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/upload
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/upload,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/upload	2000/06/02 15:05:18	1.1
--- bin/upload	2000/06/02 17:35:53	1.2
***************
*** 352,358 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $scriptUrlPath, $userName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 352,358 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $scriptUrlPath, $userName ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/view
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/view,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/view	2000/06/02 15:05:18	1.1
--- bin/view	2000/06/02 17:35:53	1.2
***************
*** 36,42 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 36,42 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName, $scriptUrlPath ) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
Index: bin/viewfile
===================================================================
RCS file: /projects/mofoa/cvsroot/TWiki/bin/viewfile,v
retrieving revision 1.1
retrieving revision 1.2
diff -c -r1.1 -r1.2
*** bin/viewfile	2000/06/02 15:05:18	1.1
--- bin/viewfile	2000/06/02 17:35:53	1.2
***************
*** 29,35 ****
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url;
  
      ( $topic, $webName) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );
--- 29,35 ----
      my $thePathInfo = $query->path_info(); 
      my $theRemoteUser = $query->remote_user();
      my $theTopic = $query->param( 'topic' );
!     my $theUrl = $query->url(-relative=>1);
  
      ( $topic, $webName) = 
  	&wiki::initialize( $thePathInfo, $theRemoteUser, $theTopic, $theUrl );