--- loncom/interface/lonpreferences.pm	2007/04/17 18:28:44	1.99
+++ loncom/interface/lonpreferences.pm	2007/05/02 01:33:49	1.101
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Preferences
 #
-# $Id: lonpreferences.pm,v 1.99 2007/04/17 18:28:44 www Exp $
+# $Id: lonpreferences.pm,v 1.101 2007/05/02 01:33:49 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -526,18 +526,25 @@ sub iconchanger {
         ('environment',['icons']);
     my $iconic='checked="checked"';
     my $classic='';
+    my $onlyicon='';
     if ($userenv{'icons'} eq 'classic') {
        $classic='checked="checked"';
        $iconic='';
     }
-    my $useicons=&mt('Use icons');
-    my $usebuttons=&mt('Use classic buttons');
+    if ($userenv{'icons'} eq 'iconsonly') {
+       $onlyicon='checked="checked"';
+       $iconic='';
+    }
+    my $useicons=&mt('Use icons and text');
+    my $usebuttons=&mt('Use buttons and text');
+    my $useicononly=&mt('Use icons only');
     my $change=&mt('Change');
     $r->print(<<ENDSCREEN);
 <form name="prefs" action="/adm/preferences" method="post">
 <input type="hidden" name="action" value="verify_and_change_icons" />
 <label><input type="radio" name="menumode" value="iconic" $iconic /> $useicons</label><br />
 <label><input type="radio" name="menumode" value="classic" $classic /> $usebuttons</label><br />
+<label><input type="radio" name="menumode" value="iconsonly" $onlyicon /> $useicononly</label><br />
 <input type="submit" value="$change" />
 </form>
 ENDSCREEN
@@ -1028,7 +1035,7 @@ sub verify_and_change_password {
         if ($caller eq 'reset_by_email') {
             $tryagain_text = &mt('Please try again later.');
         }
-        my $unable=&mt("Unable to retrieve stored token for password decryption");
+        my $unable=&mt("Unable to retrieve saved token for password decryption");
 	$r->print(<<ENDERROR);
 <p>
 <span class="LC_error">$unable.  $tryagain_text</span>
@@ -1201,7 +1208,7 @@ END
     $r->print(<<"END");
 <br />
 <br />
-<input type="submit" name="sub" value="Store Changes" />
+<input type="submit" name="sub" value="Save Changes" />
 <br />
 <br />
 Note: $lt{'thde'}
@@ -1517,7 +1524,7 @@ sub handler {
     }
 
     push (@Options,({ action   => 'changeicons',
-                      linktext => 'Change How Main Menu is Displayed',
+                      linktext => 'Change How Menus are Displayed',
                       href     => '/adm/preferences',
                       subroutine => \&iconchanger,
                       breadcrumb =>