From b81433c75e2642bbed051c3a108ba5479c91ad58 Mon Sep 17 00:00:00 2001
From: Ray Miller <ray@1729.org.uk>
Date: Sun, 1 Jun 2025 15:56:32 +0100
Subject: [PATCH] Remove unnecessary return

---
 ordo/inventory.scm | 3 +--
 ordo/play.scm      | 3 +--
 ordo/playbook.scm  | 3 +--
 3 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/ordo/inventory.scm b/ordo/inventory.scm
index 946f8be..468ff30 100644
--- a/ordo/inventory.scm
+++ b/ordo/inventory.scm
@@ -24,8 +24,7 @@
 
 (define-method (initialize (object <host>) initargs)
   (next-method)
-  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars)))
-  object)
+  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars))))
 
 (define (host . args)
   (apply make <host> args))
diff --git a/ordo/play.scm b/ordo/play.scm
index 8d4ce80..61c32c5 100644
--- a/ordo/play.scm
+++ b/ordo/play.scm
@@ -30,8 +30,7 @@
 
 (define-method (initialize (object <play>) initargs)
   (next-method)
-  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars)))
-  object)
+  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars))))
 
 (define (play . args)
   (apply make <play> args))
diff --git a/ordo/playbook.scm b/ordo/playbook.scm
index e980585..cdae7bb 100644
--- a/ordo/playbook.scm
+++ b/ordo/playbook.scm
@@ -24,8 +24,7 @@
 
 (define-method (initialize (object <playbook>) initargs)
   (next-method)
-  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars)))
-  object)
+  (slot-set! object 'vars (alist->hash-table (slot-ref object 'vars))))
 
 (define (playbook . args)
   (apply make <playbook> args))