summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authortv <tv@krebsco.de>2015-07-27 00:54:15 +0200
committertv <tv@krebsco.de>2015-07-27 01:09:25 +0200
commitb9df7908fc96c6e809c3f22bfca50d8703ce12a1 (patch)
tree81008494e0682b364428a2c89c140f1c137b5e76
parent42a5ff95e5cbcbe54ed497af7c174fe0809096f1 (diff)
4 tv: purge cruft
-rw-r--r--4lib/tv/default.nix27
1 files changed, 1 insertions, 26 deletions
diff --git a/4lib/tv/default.nix b/4lib/tv/default.nix
index 16888c2..e0a295f 100644
--- a/4lib/tv/default.nix
+++ b/4lib/tv/default.nix
@@ -9,38 +9,13 @@ with krebs;
krebs // rec {
git = import ./git.nix {
- lib = lib // {
- inherit addNames;
- };
+ lib = krebs;
inherit pkgs;
};
# "7.4.335" -> "74"
majmin = with lib; x : concatStrings (take 2 (splitString "." x));
- concat = xs :
- if xs == []
- then ""
- else head xs + concat (tail xs)
- ;
-
- flip = f : x : y : f y x;
-
- # isSuffixOf :: String -> String -> Bool
- isSuffixOf =
- s : xs :
- let
- sn = stringLength s;
- xsn = stringLength xs;
- in
- xsn >= sn && substring (xsn - sn) sn xs == s ;
-
- # setMap :: (String -> a -> b) -> Set String a -> [b]
- #setMap = f: xs: map (k : f k (getAttr k xs)) (attrNames xs);
-
- # setToList :: Set k a -> [a]
- #setToList = setMap (_: v: v);
-
shell-escape =
let
isSafeChar = c: match "[-./0-9_a-zA-Z]" c != null;