[Commits] [SCM] clawsker branch, master, updated. 1.3.3-5-ga1944ba

mones at claws-mail.org mones at claws-mail.org
Sun Feb 21 22:40:16 UTC 2021


The branch, master has been updated
       via  a1944ba9b1b6a2b0c4150f292c37171ea4320ad1 (commit)
      from  8b373a12eac7ca8ef0d5e9bd606962d668cdfde2 (commit)

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


- Log -----------------------------------------------------------------
commit a1944ba9b1b6a2b0c4150f292c37171ea4320ad1
Author: Ricardo Mones <ricardo at mones.org>
Date:   Sun Feb 21 23:40:03 2021 +0100

    Fix bug saving sections with comments

diff --git a/clawsker b/clawsker
index 7551cc2..9abe614 100755
--- a/clawsker
+++ b/clawsker
@@ -2564,17 +2564,17 @@ sub save_resource {
             foreach my $val (@{$data->{$section}{'_'}}) {
                 say RCF $val;
             }
-        } else {
-            my @keys = keys %{$data->{$section}};
-            if (defined $meta) {
-                @keys = sort {
-                    $meta->{$section}{$a} <=> $meta->{$section}{$b}
-                } @keys
-            }
-            foreach my $key (@keys) {
-                my $val = $data->{$section}{$key};
-                say RCF "$key=$val";
-            }
+            delete $data->{$section}{'_'};
+        }
+        my @keys = keys %{$data->{$section}};
+        if (defined $meta) {
+            @keys = sort {
+                $meta->{$section}{$a} <=> $meta->{$section}{$b}
+            } @keys
+        }
+        foreach my $key (@keys) {
+            my $val = $data->{$section}{$key};
+            say RCF "$key=$val";
         }
         say RCF "";
     }

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


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


More information about the Commits mailing list