From 33c2400cfccf55ef2585b8bbf0aa38f3f46073a8 Mon Sep 17 00:00:00 2001
From: prpr <prpr19xx@gmail.com>
Date: Thu, 2 Nov 2023 11:05:26 +0000
Subject: [PATCH] Tweak debug code formatting

---
 webif/lib/rsv.class | 12 +++---------
 1 file changed, 3 insertions(+), 9 deletions(-)

diff --git a/webif/lib/rsv.class b/webif/lib/rsv.class
index 03fda53..79d9d93 100644
--- a/webif/lib/rsv.class
+++ b/webif/lib/rsv.class
@@ -1592,9 +1592,7 @@ proc {rsv evaluate_conflicts} {events type thresh {debug 0}} {
 			set uslot 0
 		}
 
-		if {$debug} {
-			puts " -> into slot $uslot"
-		}
+		if {$debug} { puts " -> into slot $uslot" }
 		# Insert event into slot
 		lset slots $uslot [list $sid $end]
 	}
@@ -1604,9 +1602,7 @@ proc {rsv evaluate_conflicts} {events type thresh {debug 0}} {
 proc {rsv newconflicts} {{thresh 1} {type "list"} {debug 0}} {
 	set events [lsort -index 0 -integer [rsv allevents]]
 	set conflicts [rsv evaluate_conflicts $events $type $thresh $debug]
-	if {$debug} {
-			puts "<br>\nConflicts: $conflicts"
-		}
+	if {$debug} { puts "<br>\nConflicts: $conflicts" }
 	if {$type eq "map"} { return $conflicts }
 	return [dict keys $conflicts]
 }
@@ -1616,9 +1612,7 @@ proc {rsv checkconflict} {s d thresh {debug 0}} {
 	lappend events [list $s $($s + $d) 0 0 -1]
 	set events [lsort -index 0 -integer $events]
 	set conflicts [rsv evaluate_conflicts $events 'list' $thresh $debug]
-	if {$debug} {
-			puts "<br>\nConflicts: $conflicts"
-		}
+	if {$debug} { puts "<br>\nConflicts: $conflicts" }
 	set ret {}
 
 	if {![dict exists $conflicts "-1"]} { return $ret }