diff options
author | Sean Whitton <spwhitton@spwhitton.name> | 2021-06-15 19:42:20 -0700 |
---|---|---|
committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-06-16 15:58:11 -0700 |
commit | 7e1f68df69c29a3319cb4723b98c52023c1181cc (patch) | |
tree | c3b80ec10e4be64615181b90d37b25e1288554bc /src/property/apt.lisp | |
parent | 769ab5970673ab6406a10083847a5f48a05679fe (diff) | |
download | consfigurator-7e1f68df69c29a3319cb4723b98c52023c1181cc.tar.gz |
APT:STANDARD-SOURCES.LIST: include stable updates and backports
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/property/apt.lisp')
-rw-r--r-- | src/property/apt.lisp | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/property/apt.lisp b/src/property/apt.lisp index e408b1d..312c316 100644 --- a/src/property/apt.lisp +++ b/src/property/apt.lisp @@ -200,6 +200,14 @@ only upgrade Debian stable." (let* ((suite (os:debian-suite os)) (archive (mapcar (lambda (m) (list* m suite +sections+)) (get-mirrors))) + (updates (and (subtypep (type-of os) 'os:debian-stable) + (mapcar (lambda (m) + (list* m #?"${suite}-updates" +sections+)) + (get-mirrors)))) + (backports (and (subtypep (type-of os) 'os:debian-stable) + (mapcar (lambda (m) + (list* m #?"${suite}-backports" +sections+)) + (get-mirrors)))) (security-suite (if (memstring= suite '("stretch" "jessie" "buster")) #?"${suite}/updates" #?"${suite}-security")) @@ -208,7 +216,7 @@ only upgrade Debian stable." (list* "http://security.debian.org/debian-security" security-suite +sections+))))) (mapcan (lambda (l) (list #?"deb @{l}" #?"deb-src @{l}")) - (nconc archive security)))) + (nconc archive updates backports security)))) (defproplist additional-sources :posix (basename content) "Add additional apt source lines to a file in /etc/apt/sources.list.d named |