[interchange-cvs] interchange - racke modified dist/lib/UI/usertag/regenerate.tag
interchange-core@interchange.redhat.com
interchange-core@interchange.redhat.com
Sun Oct 7 09:07:01 2001
User: racke
Date: 2001-10-07 13:06:52 GMT
Modified: dist/lib/UI/usertag regenerate.tag
Log:
preserve VendURL
we need full path name for links on static pages
Revision Changes Path
2.3 +3 -2 interchange/dist/lib/UI/usertag/regenerate.tag
rev 2.3, prev_rev 2.2
Index: regenerate.tag
===================================================================
RCS file: /anon_cvs/repository/interchange/dist/lib/UI/usertag/regenerate.tag,v
retrieving revision 2.2
retrieving revision 2.3
diff -u -r2.2 -r2.3
--- regenerate.tag 2001/10/07 11:55:18 2.2
+++ regenerate.tag 2001/10/07 13:06:51 2.3
@@ -217,14 +217,15 @@
::response("\n\n Generating....\n");
# we need to restore some settings from the original configuration
# for static page building first
- my @confsafe = ('ImageDir', 'ImageDirSecure');
+ my @confsafe = ('ImageDir', 'ImageDirSecure', 'VendURL');
my %safehash;
for (@confsafe) {$safehash{$_} = $Vend::Cfg->{$_}}
$Vend::Cfg->{ImageDir} = $Vend::Cfg->{ImageDirOriginal};
$Vend::Cfg->{ImageDirSecure} = $Vend::Cfg->{ImageDirSecureOriginal};
+ $Vend::Cfg->{VendURL} = $Vend::Cfg->{VendURLOriginal};
my $umask = umask(022);
- my $statpath = $Vend::Cfg->{StaticPath};
+ my $statpath = 'http://' . $::Variable->{SERVER_NAME} . $Vend::Cfg->{StaticPath};
my @bad;
my $base = $Vend::Cfg->{StaticDir};
eval {