<TH ALIGN="right">Locale: </TH>
<TD COLSPAN=2>
<SELECT NAME="locale">
-% foreach my $locale ( FS::Locales->locales ) {
+% foreach my $locale ( @locales ) {
% my %info = FS::Locales->locale_info($locale);
% my $selected = ($locale eq $curuser->option('locale'))
% ? 'SELECTED' : '';
</TD>
</TR>
-% if ( FS::Conf->new->exists('enable_fuzzy_on_exact') ) {
-
- <INPUT TYPE="hidden" NAME="enable_fuzzy_on_exact" VALUE="<% $curuser->option('enable_fuzzy_on_exact') ? 1 : 0 %>">
-
-% } else {
-
- <TR>
- <TH ALIGN="right" COLSPAN=1>Enable approximate customer searching <BR>even when an exact match is found: </TH>
- <TD ALIGN="left" COLSPAN=2>
- <INPUT TYPE="checkbox" NAME="enable_fuzzy_on_exact" VALUE="1" <% $curuser->option('enable_fuzzy_on_exact') ? 'CHECKED' : '' %>>
- </TD>
- </TR>
-
-% }
-
<TR>
<TH ALIGN="right" COLSPAN=1>Disable HTML editor for customer notes: </TH>
<TD ALIGN="left" COLSPAN=2>
</TD>
</TR>
+ <TR>
+ <TH ALIGN="right">Scale documents to fit on a letter-size page</TH>
+ <TD ALIGN="left">
+ <INPUT TYPE="checkbox" NAME="printtofit" VALUE="Y" <% $curuser->option('printtofit') ? 'CHECKED' : '' %>>
+ </TD>
+ </TR>
+
<TR>
<TH ALIGN="right">How many recently-modified customers displayed on dashboard</TH>
<TD ALIGN="left" COLSPAN=2>
</TD>
</TR>
-
-
</TABLE>
<BR>
'Basics' => 'basics',
'Notes' => 'notes', #notes and files?
'Tickets' => 'tickets',
+ 'Appointments' => 'appointments',
+ 'Quotations' => 'quotations',
'Packages' => 'packages',
'Payment History' => 'payment_history',
;
$customer_views{'Change History'} = 'change_history'
if $curuser->access_right('View customer history');
-$customer_views{'Jumbo'} = 'jumbo';
# XSS via your own preferences? seems unlikely, but nice try anyway...
( $curuser->option('menu_position') || 'top' )
=~ /^([,\w\@.\-]*)$/ or die "illegal email_address"; #too late
my $email_address = $1;
+my $conf = new FS::Conf;
+
+my @locales = $conf->config('available-locales');
+
+if ( ! @locales ) {
+
+ @locales = FS::Locales->locales ;
+
+}
+
</%init>