From: ivan <ivan>
Date: Sun, 6 Jun 2010 06:21:47 +0000 (+0000)
Subject: UI
X-Git-Tag: root_of_svc_elec_features~192
X-Git-Url: http://git.freeside.biz/gitweb/?a=commitdiff_plain;h=29d6de93e7c8a65fdc6a33fe4f92685e1d738c58;p=freeside.git

UI
---

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";
   }
 }