diff options
author | ivan <ivan> | 2010-06-06 06:21:47 +0000 |
---|---|---|
committer | ivan <ivan> | 2010-06-06 06:21:47 +0000 |
commit | 29d6de93e7c8a65fdc6a33fe4f92685e1d738c58 (patch) | |
tree | d22891ea4e1a2985fd364dad938e07edc78cd466 | |
parent | 212ea833569959d8911fd94a53e056b57f6d7d64 (diff) |
UI
-rw-r--r-- | FS/FS/Mason.pm | 5 | ||||
-rw-r--r-- | httemplate/config/config-process.cgi | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/FS/FS/Mason.pm b/FS/FS/Mason.pm index 8b83f0a49..150a6c081 100644 --- a/FS/FS/Mason.pm +++ b/FS/FS/Mason.pm @@ -355,6 +355,11 @@ if ( -e $addl_handler_use_file ) { $m->comp('/elements/errorpage.html', @_); } + sub errorpage_popup { + use vars qw($m); + $m->comp('/elements/errorpage-popup.html', @_); + } + sub redirect { my( $location ) = @_; use vars qw($m); diff --git a/httemplate/config/config-process.cgi b/httemplate/config/config-process.cgi index c96f8d44d..31dce4292 100644 --- a/httemplate/config/config-process.cgi +++ b/httemplate/config/config-process.cgi @@ -80,7 +80,7 @@ if ( $conf->exists('disable_settings_changes') ) { my @changers = split(/\s*,\s*/, $conf->config('disable_settings_changes')); my %changers = map { $_=>1 } @changers; unless ( $changers{$curuser->username} ) { - errorpage("Disabled in web demo"); + include('/elements/errorpage-popup.html', "Disabled in web demo"); die "shouldn't be reached"; } } |