diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-01 17:35:43 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-04-01 17:52:40 -0700 |
| commit | 19f5faefae7182575f6fce7a1060edf0c5342569 (patch) | |
| tree | dad90cf8f2abbceb1fd6cf4c521e8b478ca0acd9 | |
| parent | 17ca198ba398068583e69bfca2d8f83d1c8ba8da (diff) | |
| download | consfigurator-19f5faefae7182575f6fce7a1060edf0c5342569.tar.gz | |
rename ETC-DEFAULT:SET -> ETC-DEFAULT:CONTAINS
For consistency with FILE:CONTAINS-* properties.
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
| -rw-r--r-- | doc/introduction.rst | 2 | ||||
| -rw-r--r-- | src/package.lisp | 3 | ||||
| -rw-r--r-- | src/property/etc-default.lisp | 2 |
3 files changed, 3 insertions, 4 deletions
diff --git a/doc/introduction.rst b/doc/introduction.rst index f2ff090..d644273 100644 --- a/doc/introduction.rst +++ b/doc/introduction.rst @@ -192,7 +192,7 @@ and/or lacks. For example,:: (eseqprops (apt:installed postfix) - (etc-default:set "locale" "LANG" "en_GB.UTF-8") + (etc-default:contains "locale" "LANG" "en_GB.UTF-8") (unapplied (com.example.consfig.services:mail-satellite))) Property application specifications are applied in order, so properties later diff --git a/src/package.lisp b/src/package.lisp index 8a83f04..9a8b9b4 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -446,8 +446,7 @@ (package :consfigurator.property.etc-default (:local-nicknames (#:file #:consfigurator.property.file)) - (:shadow #:set) - (:export #:set)) + (:export #:contains)) (package :consfigurator.property.os (:shadow #:typecase #:etypecase) diff --git a/src/property/etc-default.lisp b/src/property/etc-default.lisp index 5e5b948..18cdeb8 100644 --- a/src/property/etc-default.lisp +++ b/src/property/etc-default.lisp @@ -18,7 +18,7 @@ (in-package :consfigurator.property.etc-default) (named-readtables:in-readtable :consfigurator) -(defpropspec set :posix +(defpropspec contains :posix (file &rest pairs &aux (file* (merge-pathnames file #P"/etc/default/"))) "Where PAIRS is a list of even length of alternating keys and values, set each of these keys and values in /etc/default/FILE." |