diff options
-rw-r--r-- | src/package.lisp | 4 | ||||
-rw-r--r-- | src/property/u-boot.lisp | 9 |
2 files changed, 6 insertions, 7 deletions
diff --git a/src/package.lisp b/src/package.lisp index 98418f8..6713e36 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -731,8 +731,8 @@ #:consfigurator.property.installer) (:local-nicknames (#:os #:consfigurator.property.os) (#:apt #:consfigurator.property.apt)) - (:export #:u-boot-install-rockchip - #:u-boot-installed-rockchip)) + (:export #:install-rockchip + #:installed-rockchip)) (package :consfigurator.property.hostname (:local-nicknames (#:cmd #:consfigurator.property.cmd) diff --git a/src/property/u-boot.lisp b/src/property/u-boot.lisp index c9cb72c..467c062 100644 --- a/src/property/u-boot.lisp +++ b/src/property/u-boot.lisp @@ -23,18 +23,17 @@ ;; these available instead. (defmethod install-bootloader-propspec - ((type (eql 'u-boot-install-rockchip)) volume running-on-target + ((type (eql 'install-rockchip)) volume running-on-target &rest args &key &allow-other-keys) - `(u-boot-installed-rockchip ,volume ,running-on-target ,@args)) + `(installed-rockchip ,volume ,running-on-target ,@args)) (defmethod install-bootloader-binaries-propspec - ((type (eql 'u-boot-install-rockchip)) volume &key &allow-other-keys) + ((type (eql 'install-rockchip)) volume &key &allow-other-keys) '(os:etypecase (debianlike (apt:installed "u-boot-rockchip")))) -(defprop u-boot-installed-rockchip :posix - (volume running-on-target &key target) +(defprop installed-rockchip :posix (volume running-on-target &key target) (:desc "Installed U-Boot using Debian scripts") (:hostattrs (os:required 'os:debianlike) |