Remove Sanitize Plugins functionality since that's not relevant anymore to 1.3
[squirrelmail.git] / config / conf.pl
index b981d6a4db3a7c443e72431818146d9082daecee..2215074e5057f852be87ec482d227f298281366f 100755 (executable)
@@ -525,8 +525,6 @@ 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";
     } elsif ( $menu == 9 ) {
@@ -659,7 +657,6 @@ 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(); }
         } elsif ( $menu == 9 ) {
             if    ( $command == 1 ) { $addrbook_dsn     = command91(); }
             elsif ( $command == 2 ) { $addrbook_table   = command92(); }
@@ -1094,17 +1091,6 @@ sub command81 {
             while ( $ct <= $#unused_plugins ) {
                 if ( $ct == $num ) {
                     @newplugins = ( @newplugins, $unused_plugins[$ct] );
-
-                    # sanitize the plugin
-                    $dir = $unused_plugins[$ct];
-                    if (-d "../plugins/$dir") {
-                        `./ri_once.pl ../plugins/$dir`;
-                    } else {
-                        print "Could not locate ../plugins/$dir\n" ;
-                        print "The plugin $dir could *not* be sanitized!\n" ;
-                        print "If you want to try to do this manually, please run\n" ;
-                         print "config/ri_once.pl with the full path to the $dir plugin.\n" ;
-                    }
                 }
                 $ct++;
             }
@@ -1114,18 +1100,6 @@ 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 = <STDIN>;
-    if ( $ctu =~ /^y\n/i ) {
-        `./ri_once.pl ../plugins`;
-    }
-}
-
 ################# FOLDERS ###################
 
 # default_folder_prefix