Changeset 15268 for vendors/FCM/lib/Fcm/ConfigSystem.pm

Timestamp:

2021-09-17T11:17:05+02:00 (3 years ago)

Author:

clem

Message:

commit solution of the defect #2622 found by Jean-Marc for compilation on Jean-Zay machines. Great improvement.

File:

• vendors/FCM/lib/Fcm/ConfigSystem.pm (modified) (1 diff)

vendors/FCM/lib/Fcm/ConfigSystem.pm

@@ -330 +330 @@
     while (my ($key, $val) = each(%old_val_of)) {
       if (exists($changed{$key})) {
+        # JMM Eliminate trailing and leading blank before comparison
+        $val=~ s/^\s+|\s+$//g;
+        $new_val_of{$key}=~ s/^\s+|\s+$//g;
         if ($val eq $new_val_of{$key}) { # no change from old to new
           delete($changed{$key});