mirror of
https://github.com/void-linux/void-packages.git
synced 2025-09-26 05:35:12 +02:00
49cb564d14
* par is kept at -Np0
```sh
git grep -l '^patch_args=-Np0' "srcpkgs/$1*/template" |
while read template; do
for p in ${template%/template}/patches/*; do
sed -i '
\,^[+-][+-][+-] /dev/null,b
/^[*-]\+ [0-9]\+\(,[0-9]\+\)\? [*-]\+$/b
s,^[*][*][*] ,&a/,
/^--- /{
s,\(^--- \)\(./\)*,\1a/,
s,[.-][Oo][Rr][Ii][Gg]\([ /]\),\1,
s/[.-][Oo][Rr][Ii][Gg]$//
s/[.]patched[.]\([^.]\)/.\1/
h
}
/^+++ -/{
g
s/^--- a/+++ b/
b
}
s,\(^+++ \)\(./\)*,\1b/,
' "$p"
done
sed -i '/^patch_args=/d' $template
done
```
11 lines
394 B
Diff
11 lines
394 B
Diff
--- a/src/check.ml
|
|
+++ b/src/check.ml
|
|
@@ -37,7 +37,7 @@
|
|
|
|
let of_labels labels = List.fold_left (fun lbs lb -> add (lb, None) lbs) empty labels
|
|
let occurs lb lbs = mem (lb, None) lbs
|
|
- let pretty lbs = "{ " ^ (flatten_strings ", " (map fst (elements lbs))) ^ " }"
|
|
+ let pretty lbs = "{ " ^ (flatten_strings ", " (List.map fst (elements lbs))) ^ " }"
|
|
end
|
|
|
|
|