From 93c06fa2fe24bf3baef31ac26e356d2c9d6454d7 Mon Sep 17 00:00:00 2001 From: ebullient Date: Tue, 31 Dec 2002 16:08:42 +0000 Subject: [PATCH] skip http: paths for SM_PATH mods git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@4338 7612ce4b-ef26-0410-bec9-ea0150e637f0 --- config/conf.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/config/conf.pl b/config/conf.pl index d72085f5..7543b6d9 100755 --- a/config/conf.pl +++ b/config/conf.pl @@ -2594,7 +2594,8 @@ sub save_data { print CF " * Created using the configure script, conf.pl\n"; print CF " */\n"; print CF "\n"; - + print CF "global \$version;\n"; + if ($print_config_version) { print CF "\$config_version = '$print_config_version';\n"; } @@ -2968,9 +2969,10 @@ sub change_to_SM_path() { # If the path is absolute, don't bother. return "\'" . $old_path . "\'" if ( $old_path eq ''); return "\'" . $old_path . "\'" if ( $old_path =~ /^\// ); + return "\'" . $old_path . "\'" if ( $old_path =~ /^http/ ); return $old_path if ( $old_path =~ /^\$/); return $old_path if ( $old_path =~ /^SM_PATH/ ); - + # For relative paths, split on '../' @rel_path = split(/\.\.\//, $old_path); @@ -3008,6 +3010,7 @@ sub change_to_rel_path() { return $old_path if ( $old_path eq ''); return $old_path if ( $old_path =~ /^\$/ ); return $old_path if ( $old_path =~ /^\// ); + return $old_path if ( $old_path =~ /^http/ ); return $old_path if ( $old_path =~ /^\.\./ ); if ( $old_path =~ /^SM_PATH/ ) { -- 2.25.1