From aca95f627c0bca95822711035b4603b4b1c4640e Mon Sep 17 00:00:00 2001
From: Milan <mc@radiopiloten.de>
Date: Sat, 23 May 2020 23:56:32 +0200
Subject: [PATCH] playout.pm: fix unitialized warnings

---
 lib/calcms/playout.pm | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/lib/calcms/playout.pm b/lib/calcms/playout.pm
index 2cb894f..cad8966 100644
--- a/lib/calcms/playout.pm
+++ b/lib/calcms/playout.pm
@@ -286,7 +286,7 @@ sub sync ($$) {
                     playout    => 0,
                 }
             );
-            print STDERR "delete playout_status result=" . $result . "\n";
+            print STDERR "delete playout_status result=" . ($result // 'undef') . "\n";
             next;
         }
 
@@ -303,7 +303,7 @@ sub sync ($$) {
                     playout    => 1,
                 }
             );
-            print STDERR "update playout_status result=" . $result . "\n";
+            print STDERR "update playout_status result=" . ($result // 'undef') . "\n";
             next;
         }
     }
@@ -324,7 +324,7 @@ sub sync ($$) {
                     playout    => 1,
                 }
             );
-            print STDERR "insert playout_status result=" . $result . "\n";
+            print STDERR "insert playout_status result=" . ($result // 'undef'). "\n";
         }
     }
     return 1;
@@ -342,7 +342,7 @@ sub has_changed ($$) {
         'writing_library', 'modified_at'
       )
     {
-        return 1 if ( $oldEntry->{$key} || '' ) ne ( $newEntry->{$key} || '' );
+        return 1 if ( $oldEntry->{$key} // '' ) ne ( $newEntry->{$key} // '' );
     }
     return 0;
 }