X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fconfig%2Fconfig-view.cgi;h=59646896ef66026e72105aa8e9b9c86aa7ae347a;hb=928a126034e99d99420a1cf1a7eb551e1e1d320d;hp=e7cadbe9938e78e4be6352179641e12dcf0264e9;hpb=5fdd19665fb7c0ad425a99d3dbf9ad7e27fbf44a;p=freeside.git
diff --git a/httemplate/config/config-view.cgi b/httemplate/config/config-view.cgi
index e7cadbe99..59646896e 100644
--- a/httemplate/config/config-view.cgi
+++ b/httemplate/config/config-view.cgi
@@ -16,6 +16,38 @@ Click on a configuration value to change it.
% }
%
% }
+% if ( @locales ) {
+(
+% if ( $locale ) {
+% $cgi->delete('locale');
+ global settings |
+% }
+
+invoice language options:
+
+
<% include('/elements/init_overlib.html') %>
@@ -89,11 +121,12 @@ Click on a configuration value to change it.
% if $agent && $cgi->param('showagent');
%
% #indentation :/
+% my $action = 'config.cgi?key=' . $i->key .
+% ";agentnum=$agentnum" . ($locale ? ";locale=$locale" : '');
<% include('/elements/popup_link.html',
- 'action' => 'config.cgi?key='. $i->key.
- ';agentnum='. $agentnum,
+ 'action' => $action,
'width' => $width,
'height' => $height,
'actionlabel' => 'Enter configuration value',
@@ -128,12 +161,12 @@ Click on a configuration value to change it.
|
% } elsif ( $type eq 'image' ) {
+% my $args = 'key=' . $i->key . ";agentnum=$agentnum;locale=$locale";
<% $conf->exists($i->key, $agentnum)
- ? ''
+ ? ''
: 'empty'
%>
|
@@ -141,18 +174,19 @@ Click on a configuration value to change it.
<% $conf->exists($i->key, $agentnum)
- ? qq!download!
+ ? 'download'
: ''
%>
|
% } elsif ( $type eq 'binary' ) {
+% my $args = 'key=' . $i->key . ";agentnum=$agentnum;locale=$locale";
<% $conf->exists($i->key, $agentnum)
- ? qq!download!
+ ? 'download'
: 'empty'
%>
|
@@ -344,14 +378,37 @@ if ($cgi->param('agentnum') =~ /^(\d+)$/) {
die "Agent $page_agentnum not found!" unless $page_agent;
push @menubar, 'View all agents' => $p.'browse/agent.cgi';
+}
+
+my $conf = new FS::Conf;
+my $conf_global = $conf;
+
+my @locales = $conf_global->config('available-locales');
+
+# if this is set, we are in locale mode, so limit the displayed items
+# to those with per_locale.
+my $locale;
+my $locale_desc;
+if ( $cgi->param('locale') =~ /^\w+_\w+$/ ) {
+ $locale = $cgi->param('locale');
+ # and set the context on $conf
+ $conf = new FS::Conf { 'locale' => $locale, 'localeonly' => 1 };
+ my %locale_info = FS::Locales->locale_info($locale);
+ $locale_desc = "$locale_info{name} ($locale_info{country})";
+
+ $title = 'Invoice Configuration'; #for now it is only invoicing
+ $title .= ' for '.$page_agent->agent if $page_agent;
+ $title .= ', '.$locale_desc;
+
+} elsif ($page_agent) {
$title = 'Agent Configuration for '. $page_agent->agent;
+ $title .= ", $locale_desc" if $locale;
} else {
$title = 'Global Configuration';
}
-my $conf = new FS::Conf;
-
-my @config_items = grep { $page_agent ? $_->per_agent : 1 }
+my @config_items = grep { !defined($locale) or $_->per_locale }
+ grep { $page_agent ? $_->per_agent : 1 }
grep { $page_agent ? 1 : !$_->agentonly }
$conf->config_items;