aboutsummaryrefslogtreecommitdiff
path: root/src/property/os.lisp
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2022-03-12 14:56:34 -0700
committerSean Whitton <spwhitton@spwhitton.name>2022-03-12 14:56:34 -0700
commit2b89cfb8645afb249f6cc21fe3ae588dae5210be (patch)
treed67961d7a112b96dea9f46bf32034f69a6405acf /src/property/os.lisp
parent2d8291f14de90fcf8ad09bcc175b5fcdaaf91531 (diff)
downloadconsfigurator-2b89cfb8645afb249f6cc21fe3ae588dae5210be.tar.gz
rename DEFINE-PRINT-OBJECT-FOR-STRUCTLIKE & REINIT-STRUCTLIKE
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/os.lisp')
-rw-r--r--src/property/os.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/property/os.lisp b/src/property/os.lisp
index e9a9d8e..c4da923 100644
--- a/src/property/os.lisp
+++ b/src/property/os.lisp
@@ -32,7 +32,7 @@
(:desc "Host kernel is Linux")
(:hostattrs (push-hostattrs :os (make-instance 'linux :arch architecture))))
-(define-print-object-for-structlike linux)
+(define-simple-print-object linux)
(defclass debianlike (linux) ())
@@ -41,7 +41,7 @@
:reader debian-suite
:initform (error "Must provide suite"))))
-(define-print-object-for-structlike debian)
+(define-simple-print-object debian)
(defclass debian-stable (debian) ())