and more
[squirrelmail.git] / config / conf.pl
index 4360f04703ef784ac4544b515ba2e1c8e6f31001..9c3b27b17f72fdb094713e6bc5d121514961d5fc 100755 (executable)
@@ -248,6 +248,9 @@ if (!$use_authenticated_smtp) {
 if (!$auto_create_special) {
        $auto_create_special = "false";
 }
+if(!$default_use_priority) {
+        $default_use_priority = "true";
+}
 
 #####################################################################################
 if ($config_use_color == 1) {
@@ -340,6 +343,7 @@ while (($command ne "q") && ($command ne "Q")) {
       print "3.  Attachment Directory   : $WHT$attachment_dir$NRM\n";
       print "4.  Default Left Size      : $WHT$default_left_size$NRM\n";
       print "5.  Usernames in Lowercase : $WHT$force_username_lowercase$NRM\n";
+      print "6.  Allow use of priority  : $WHT$default_use_priority$NRM\n";
       print "\n";
       print "R   Return to Main Menu\n";
    } elsif ($menu == 5) {
@@ -495,6 +499,7 @@ while (($command ne "q") && ($command ne "Q")) {
          elsif ($command == 3) { $attachment_dir           = command34 (); }
          elsif ($command == 4) { $default_left_size        = command35 (); }
         elsif ($command == 5) { $force_username_lowercase = command36 (); }
+        elsif ($command == 6) { $default_use_priority     = command37 (); }
       } elsif ($menu == 5) {
          if    ($command == 1) { command41 (); }
          elsif ($command == 2) { $theme_css = command42 (); }
@@ -904,7 +909,7 @@ sub command22 {
 sub command23a {
    print "You can now specify where the default trash folder is located.\n";
    print "On servers where you do not want this, you can set it to anything\n";
-   print "and set option 7 to false.\n";
+   print "and set option 6 to false.\n";
    print "\n";
    print "This is relative to where the rest of your email is kept.  You do\n";
    print "not need to worry about their mail directory.  If this folder\n";
@@ -1338,6 +1343,24 @@ sub command36 {
    return "false";
 }
 
+sub command37 {
+   print "";
+   print "\n";
+   
+   if ($default_use_priority eq "true") {
+      $default_value = "y";
+   } else {
+      $default_value = "n";
+   }
+   
+   print "Allow users to specify priority of outgoing mail (y/n) [$WHT$default_value$NRM]: $WHT";
+      $new_show = <STDIN>;
+      if (($new_show =~ /^y\n/i) || (($new_show =~ /^\n/) && ($default_value eq "y"))) {
+         return "true";
+      }
+      return "false";
+}
+                                                        
 
 sub command41 {
    print "\nNow we will define the themes that you wish to use.  If you have added\n";
@@ -1731,11 +1754,13 @@ sub save_data {
 
    print FILE "\tglobal \$default_charset, \$data_dir, \$attachment_dir;\n";
    print FILE "\tglobal \$default_left_size, \$force_username_lowercase;\n";
+   print FILE "\tglobal \$default_use_priority;\n";
    print FILE "\t\$default_charset          = \"$default_charset\";\n";
    print FILE "\t\$data_dir                 = \"$data_dir\";\n";
    print FILE "\t\$attachment_dir           = \"$attachment_dir\";\n";
    print FILE "\t\$default_left_size        =  $default_left_size;\n";
    print FILE "\t\$force_username_lowercase = $force_username_lowercase;\n";
+   print FILE "\t\$default_use_priority     = $default_use_priority;\n";
 
    print FILE "\n";