This commit was generated by cvs2svn to compensate for changes in r6255,

[freeside.git] / FS / FS / CGI.pm

diff --git a/FS/FS/CGI.pm b/FS/FS/CGI.pm
index 15561d7..38a869c 100644 (file)
--- 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">'.