diff options
Diffstat (limited to 'src/property/os.lisp')
| -rw-r--r-- | src/property/os.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/property/os.lisp b/src/property/os.lisp index 937e3c5..fb5ef44 100644 --- a/src/property/os.lisp +++ b/src/property/os.lisp @@ -22,7 +22,7 @@ "Error out if the OS of the host being deployed is not of type TYPE. Used in property :HOSTATTRS subroutines." - (let ((os (class-of (car (get-hostattrs :os))))) + (let ((os (class-of (get-hostattrs-car :os)))) (unless (and os (subtypep os type)) (error 'inapplicable-property :text #?"Property requires OS of type ${type}")))) |