Apt: stable-updates suite
Signed-off-by: Félix Sipma <felix.sipma@no-log.org>
This commit is contained in:
parent
499cebd3c7
commit
9d6a79bc23
|
@ -29,6 +29,10 @@ backportSuite :: DebianSuite -> Maybe String
|
||||||
backportSuite (Stable s) = Just (s ++ "-backports")
|
backportSuite (Stable s) = Just (s ++ "-backports")
|
||||||
backportSuite _ = Nothing
|
backportSuite _ = Nothing
|
||||||
|
|
||||||
|
stableUpdatesSuite :: DebianSuite -> Maybe String
|
||||||
|
stableUpdatesSuite (Stable s) = Just (s ++ "-updates")
|
||||||
|
stableUpdatesSuite _ = Nothing
|
||||||
|
|
||||||
debLine :: String -> Url -> [Section] -> Line
|
debLine :: String -> Url -> [Section] -> Line
|
||||||
debLine suite mirror sections = unwords $
|
debLine suite mirror sections = unwords $
|
||||||
["deb", mirror, suite] ++ sections
|
["deb", mirror, suite] ++ sections
|
||||||
|
|
Loading…
Reference in New Issue