From: teepe Date: Sun, 11 Nov 2001 01:43:08 +0000 (+0000) Subject: added automagically sanitizing for foo_once into the conf.pl script X-Git-Url: https://vcs.fsf.org/?p=squirrelmail.git;a=commitdiff_plain;h=f526c4fe6ab38fcfde7213d00d8ca165de462dd3 added automagically sanitizing for foo_once into the conf.pl script git-svn-id: https://svn.code.sf.net/p/squirrelmail/code/trunk/squirrelmail@1721 7612ce4b-ef26-0410-bec9-ea0150e637f0 --- diff --git a/config/conf.pl b/config/conf.pl index 9c3b27b1..058d627f 100755 --- a/config/conf.pl +++ b/config/conf.pl @@ -406,6 +406,8 @@ while (($command ne "q") && ($command ne "Q")) { } closedir DIR; + print "\n"; + print "A Sanitize all plugins for use with Squirrelmail 1.2\n"; print "\n"; print "R Return to Main Menu\n"; } @@ -510,6 +512,7 @@ while (($command ne "q") && ($command ne "Q")) { if ($command == 1) { $motd = command71(); } } elsif ($menu == 8) { if ($command =~ /^[0-9]+/) { @plugins = command81(); } + elsif ($command eq "a") { command8s(); } } } } @@ -838,6 +841,9 @@ sub command81 { while ($ct <= $#unused_plugins) { if ($ct == $num) { @newplugins = (@newplugins, $unused_plugins[$ct]); + # sanitize the plugin + $dir = $unused_plugins[$ct]; + `./ri_once.pl ../plugins/$dir`; } $ct++; } @@ -847,6 +853,18 @@ sub command81 { return @plugins; } +sub command8s { + print "This command will sanitize all plugins for use with\n"; + print "Squirrelmail 1.2. That is, it will rewrite some php-\n"; + print "constructs that are *incompatible* with the 1.2 design\n"; + print "into ones that are *compatible*\n"; + print "Do you wish to issue this command [y/N]? "; + $ctu = ; + if ($ctu =~ /^y\n/i) { + `./ri_once.pl ../plugins`; + } +} + ################# FOLDERS ################### # default_folder_prefix