[Commits] [SCM] clawsker branch, master, updated. 1.2.0-6-g7675f4d

mones at claws-mail.org mones at claws-mail.org
Wed Nov 7 21:34:26 CET 2018


The branch, master has been updated
       via  7675f4d7cb2ef584083f23561648fc6cb097825c (commit)
      from  52589d56c16b9d9884b39ee739bf98e935312c74 (commit)

Summary of changes:
 clawsker |   12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)


- Log -----------------------------------------------------------------
commit 7675f4d7cb2ef584083f23561648fc6cb097825c
Author: Ricardo Mones <ricardo at mones.org>
Date:   Wed Nov 7 21:33:58 2018 +0100

    Fix undetected changes when value is zero

diff --git a/clawsker b/clawsker
index 7e4e9e9..45bb2e4 100755
--- a/clawsker
+++ b/clawsker
@@ -348,7 +348,7 @@ sub handle_bool_value {
     my ($widget, $event, $dataref) = @_;
     $$dataref->[VALUE] = ($widget->get_active ())? '1': '0';
     $MODIFIED += $$dataref->[VALUE] != $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub handle_int_value {
@@ -364,14 +364,14 @@ sub handle_int_value {
         $widget->set_text ($$dataref->[VALUE]);
     }
     $MODIFIED += $$dataref->[VALUE] != $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub handle_string_value {
     my ($widget, $event, $dataref) = @_;
     $$dataref->[VALUE] = $widget->get_text ();
     $MODIFIED += $$dataref->[VALUE] ne $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub handle_nchar_value {
@@ -380,7 +380,7 @@ sub handle_nchar_value {
     $widget->set_text ($_);
     $$dataref->[VALUE] = $_;
     $MODIFIED += $$dataref->[VALUE] ne $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub gdk_color_from_str {
@@ -410,14 +410,14 @@ sub handle_color_value {
     my $newcol = $widget->get_color;
     $$dataref->[VALUE] = str_from_gdk_color ($newcol);
     $MODIFIED += $$dataref->[VALUE] ne $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub handle_selection_value {
     my ($widget, $event, $dataref) = @_;
     $$dataref->[VALUE] = $widget->get_active;
     $MODIFIED += $$dataref->[VALUE] ne $$dataref->[IVALUE]? 1: -1
-        if $$dataref->[IVALUE];
+        if defined $$dataref->[IVALUE];
 }
 
 sub get_rc_filename {

-----------------------------------------------------------------------


hooks/post-receive
-- 
Hidden preferences editor for Claws Mail


More information about the Commits mailing list