blob: 9778d536475c96ec446a3775a52becbd160a4c90 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
{ writeHaskell, writeBashBin, runCommandLocal
, emoji-generic, utf8-light, attoparsec, text, bytestring
, bemenu
, fromTep ? "cut -d' ' -f1"
, copy ? "wl-copy --trim-newline"
, emojiTestTxt
}:
let
tepData = writeHaskell "tep-data" {
libraries = [ emoji-generic utf8-light attoparsec text bytestring ];
} ./tepData.hs;
emojis = runCommandLocal "emojis.txt" {} ''
${tepData} < ${emojiTestTxt} > "$out"
'';
in
writeBashBin "tep" ''
copy=false
if [[ "$1" = "copy" ]]; then
copy=true
shift
fi
${bemenu}/bin/bemenu $@ < ${emojis} | ${fromTep} | \
if $copy; then
${copy}
else
cat
fi
''
|