X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FCGI.pm;h=38a869ccdd881829fda9ca7d8af9faa23b1d8035;hb=c648976f0b7975f2328ebd7ba8c711fad0ca4195;hp=15561d7cc6e6e93274ddcc6979b8d6c0a5117cdb;hpb=8b3782a95dcbc9fe5311b0522416791055a32f4d;p=freeside.git

diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm
index 15561d7cc..38a869ccd 100644
--- a/FS/FS/CGI.pm
+++ b/FS/FS/CGI.pm
@@ -230,7 +230,7 @@ sub rooturl {
   $url_string =~
     s{
        /
-       (browse|config|docs|edit|graph|misc|search|view|pref|rt)
+       (browse|config|docs|edit|graph|misc|search|view|pref|rt|elements)
        /
        (process/)?
        ([\w\-\.\/]+)
@@ -238,6 +238,10 @@ sub rooturl {
      }
      {}x;
 
+  #elements because of progress-popup.html... 
+  #XXX remove anything from elements that is called directly & prevent
+  #those pages from being served up
+
   $url_string .= '/' unless $url_string =~ /\/$/;
 
   $url_string;
@@ -321,7 +325,7 @@ sub small_custview {
     if $url;
 
   $html .= 'Customer #<B>'. $cust_main->custnum. '</B></A>'.
-    ' - <B><FONT COLOR="'. $cust_main->statuscolor. '">'.
+    ' - <B><FONT COLOR="#'. $cust_main->statuscolor. '">'.
     ucfirst($cust_main->status). '</FONT></B>'.
     ntable('#e8e8e8'). '<TR><TD VALIGN="top">'. ntable("#cccccc",2).
     '<TR><TD ALIGN="right" VALIGN="top">Billing<BR>Address</TD><TD BGCOLOR="#ffffff">'.