aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-03-05 10:44:21 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-03-05 12:20:14 -0700
commita78de4b6fb80b131f00ed548cbc3264a43e8a985 (patch)
tree8b0a251240026613e0b5f9aee55d4942f8eabdfd /src
parent21d9e808eeb94b6bb4394a25ad6a0d37c180ccff (diff)
downloadconsfigurator-a78de4b6fb80b131f00ed548cbc3264a43e8a985.tar.gz
add OS:DEBIANLIKE
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src')
-rw-r--r--src/package.lisp1
-rw-r--r--src/property/os.lisp4
2 files changed, 4 insertions, 1 deletions
diff --git a/src/package.lisp b/src/package.lisp
index 5869986..db4257e 100644
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -191,6 +191,7 @@
(:use #:cl #:consfigurator)
(:export #:unixlike
#:linux
+ #:debianlike
#:debian
#:debian-stable
#:debian-testing
diff --git a/src/property/os.lisp b/src/property/os.lisp
index 28e88d3..6ef14f9 100644
--- a/src/property/os.lisp
+++ b/src/property/os.lisp
@@ -25,7 +25,9 @@
:documentation
"Keyword whose name is Debian's name for this architecture, e.g. :AMD64")))
-(defclass debian (linux)
+(defclass debianlike (linux) ())
+
+(defclass debian (debianlike)
((suite :initarg :suite
:reader debian-suite
:initform (error "Must provide suite"))))