[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