[svn:p5ee] r12553 - p5ee/trunk/App-Widget/lib/App

[email protected] Fri, 27 Feb 2009 14:13:02 -0800 (PST)
Newsgroups perl.cvs.p5ee
Message-ID <[email protected]>
Author: spadkins
Date: Fri Feb 27 14:13:01 2009
New Revision: 12553

Modified:
   p5ee/trunk/App-Widget/lib/App/Widget.pm

Log:
revert the last change

Modified: p5ee/trunk/App-Widget/lib/App/Widget.pm
==============================================================================
--- p5ee/trunk/App-Widget/lib/App/Widget.pm	(original)
+++ p5ee/trunk/App-Widget/lib/App/Widget.pm	Fri Feb 27 14:13:01 2009
@@ -580,7 +580,6 @@
                 }
                 else {
                     $formatted_value = int($formatted_value);
-
                     if ($int =~ /,/) {
                         $formatted_value =~ s/([0-9])([0-9][0-9][0-9])$/$1,$2/;
                         while ($formatted_value =~ s/([0-9])([0-9][0-9][0-9]),/$1,$2,/) {
@@ -606,12 +605,12 @@
                     if ($paren) {
                         $formatted_value = "(" . $formatted_value . ")";
                     }
-                    elsif ($sign && $formatted_value < 0) {
+                    elsif ($sign && $value < 0) {
                         $formatted_value = "-" . $formatted_value;
                     }
                 }
                 else {
-                    if ($sign && $formatted_value > 0) {
+                    if ($sign && $value > 0) {
                         $formatted_value = "+" . $formatted_value;
                     }
                 }