diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-13 09:36:48 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-03-15 17:18:39 -0700 |
commit | 62b4e594daa795885fa9bf5e30f8cee1c7e69a60 (patch) | |
tree | 498189dfee997c0f97185a0e7353fdb23e141c6e /src/property/apt.lisp | |
parent | ca2d9e30483cbbd5f88c064b6db8c6ccd3eed4d8 (diff) | |
download | consfigurator-62b4e594daa795885fa9bf5e30f8cee1c7e69a60.tar.gz |
use LIST* in various places
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/apt.lisp')
-rw-r--r-- | src/property/apt.lisp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/property/apt.lisp b/src/property/apt.lisp index 8fd69e6..41b9b2e 100644 --- a/src/property/apt.lisp +++ b/src/property/apt.lisp @@ -73,15 +73,15 @@ (defmethod standard-sources-for ((os os:debian)) (let* ((suite (os:debian-suite os)) - (archive (mapcar (lambda (m) (cons m (cons suite sections))) + (archive (mapcar (lambda (m) (list* m suite sections)) (get-mirrors))) (security-suite (if (memstring= suite '("stretch" "jessie" "buster")) #?"${suite}/updates" #?"${suite}-security")) (security (and (not (subtypep (type-of os) 'os:debian-unstable)) (list - (cons "http://security.debian.org/debian-security" - (cons security-suite sections)))))) + (list* "http://security.debian.org/debian-security" + security-suite sections))))) (mapcan (lambda (l) (list #?"deb @{l}" #?"deb-src @{l}")) (nconc archive security)))) |