aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2021-04-29 11:05:57 -0700
committerSean Whitton <spwhitton@spwhitton.name>2021-04-29 11:05:57 -0700
commit37d41fbf8bbc217d31f6e691bb1ca0126e6c90d4 (patch)
tree65c424f2e5e2e725415b1d2ae2ad193a16d939e8 /src
parent826a73478801195abb7e4d15391f3c25123f8ccc (diff)
downloadconsfigurator-37d41fbf8bbc217d31f6e691bb1ca0126e6c90d4.tar.gz
define CREATE-VOLUME for opened volumes
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src')
-rw-r--r--src/property/disk.lisp3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/property/disk.lisp b/src/property/disk.lisp
index 1f9a8cb..3a966ea 100644
--- a/src/property/disk.lisp
+++ b/src/property/disk.lisp
@@ -144,6 +144,9 @@ Return values, if any, should be ignored."))
(defmethod open-volume ((volume opened-volume) file)
volume)
+(defmethod create-volume ((volume opened-volume) file)
+ (values))
+
(defgeneric make-opened-volume (volume device-file)
(:documentation
"Where there is a class which is a subclass of both the class of VOLUME and