···

       
93
       
 
       
      hiPrioSet;

     

       
94
       
 
       
    inherit (sources) pathType pathIsDirectory cleanSourceFilter

     

       
95
       
 
       
      cleanSource sourceByRegex sourceFilesBySuffices

     

       
96
       
-
       
      commitIdFromGitRepo cleanSourceWith;

     

       
97
       
 
       
    inherit (modules) evalModules closeModules unifyModuleSyntax

     

       
98
       
 
       
      applyIfFunction unpackSubmodule packSubmodule mergeModules

     

       
99
       
 
       
      mergeModules' mergeOptionDecls evalOptionValue mergeDefinitions

     

···

       
93
       
 
       
      hiPrioSet;

     

       
94
       
 
       
    inherit (sources) pathType pathIsDirectory cleanSourceFilter

     

       
95
       
 
       
      cleanSource sourceByRegex sourceFilesBySuffices

     

       
96
       
+
       
      commitIdFromGitRepo cleanSourceWith pathHasContext canCleanSource;

     

       
97
       
 
       
    inherit (modules) evalModules closeModules unifyModuleSyntax

     

       
98
       
 
       
      applyIfFunction unpackSubmodule packSubmodule mergeModules

     

       
99
       
 
       
      mergeModules' mergeOptionDecls evalOptionValue mergeDefinitions

     

···

       
93
       
 
       
                else lib.head matchRef

     

       
94
       
 
       
           else throw ("Not a .git directory: " + path);

     

       
95
       
 
       
    in lib.flip readCommitFromFile "HEAD";

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
96
       
 
       
}

     

···

       
93
       
 
       
                else lib.head matchRef

     

       
94
       
 
       
           else throw ("Not a .git directory: " + path);

     

       
95
       
 
       
    in lib.flip readCommitFromFile "HEAD";

     

       
96
       
+
       


     

       
97
       
+
       
  pathHasContext = builtins.hasContext or (lib.hasPrefix builtins.storeDir);

     

       
98
       
+
       


     

       
99
       
+
       
  canCleanSource = src: src ? _isLibCleanSourceWith || !(pathHasContext (toString src));

     

       
100
       
 
       
}

     

···

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

       
0
       
 
       

     

···

       
1
       
+
       
# | Discard the context of a string while ensuring that expected path

     

       
2
       
+
       
# validity invariants hold.

     

       
3
       
+
       
#

     

       
4
       
+
       
# This relies on import-from-derivation, but it is only useful in

     

       
5
       
+
       
# contexts where the string is going to be used in an

     

       
6
       
+
       
# import-from-derivation anyway.

     

       
7
       
+
       
#

     

       
8
       
+
       
# safeDiscardStringContext : String → String

     

       
9
       
+
       
{ writeText }: s:

     

       
10
       
+
       
  builtins.seq

     

       
11
       
+
       
    (import (writeText

     

       
12
       
+
       
               "discard.nix"

     

       
13
       
+
       
               "${builtins.substring 0 0 s}null\n"))

     

       
14
       
+
       
    (builtins.unsafeDiscardStringContext s)

     

···

       
146
       
 
       
      overrideCabal (self.callPackage (haskellSrc2nix {

     

       
147
       
 
       
        inherit name;

     

       
148
       
 
       
        src = pkgs.lib.cleanSourceWith

     

       
149
       
-
       
          { inherit src;

     

       
0
       
 
       

     

       
0
       
 
       

     

       
150
       
 
       
            filter = path: type:

     

       
151
       
 
       
              pkgs.lib.hasSuffix "${name}.cabal" path ||

     

       
152
       
 
       
              pkgs.lib.hasSuffix "package.yaml" path;

     

···

       
146
       
 
       
      overrideCabal (self.callPackage (haskellSrc2nix {

     

       
147
       
 
       
        inherit name;

     

       
148
       
 
       
        src = pkgs.lib.cleanSourceWith

     

       
149
       
+
       
          { src = if pkgs.lib.canCleanSource src

     

       
150
       
+
       
                    then src

     

       
151
       
+
       
                    else pkgs.safeDiscardStringContext src;

     

       
152
       
 
       
            filter = path: type:

     

       
153
       
 
       
              pkgs.lib.hasSuffix "${name}.cabal" path ||

     

       
154
       
 
       
              pkgs.lib.hasSuffix "package.yaml" path;

     

···

       
20237
       
 
       
  wal-g = callPackage ../tools/backup/wal-g {};

     

       
20238
       
 
       


     

       
20239
       
 
       
  tlwg = callPackage ../data/fonts/tlwg { };

     

       
0
       
 
       

     

       
0
       
 
       

     

       
20240
       
 
       
}

     

···

       
20237
       
 
       
  wal-g = callPackage ../tools/backup/wal-g {};

     

       
20238
       
 
       


     

       
20239
       
 
       
  tlwg = callPackage ../data/fonts/tlwg { };

     

       
20240
       
+
       


     

       
20241
       
+
       
  safeDiscardStringContext = callPackage ../build-support/safe-discard-string-context.nix { };

     

       
20242
       
 
       
}