This repository has no description
905 B
41 lines
1{ pkgs }:
2let
3
4 review = pkgs.writers.writeBash "review-mail" ''
5 mail="$1"
6 ${pkgs.exim}/bin/exim -Mvc "$mail" | grep -E 'Subject:|To:'
7 ${pkgs.exim}/bin/exim -Mvl "$mail"
8 while :; do
9 read -p 'delete?' key
10 case "$key" in
11 v*)
12 ${pkgs.exim}/bin/exim -Mvc "$mail"
13 ;;
14 d*)
15 ${pkgs.exim}/bin/exim -Mrm "$mail"
16 break
17 ;;
18 r*)
19 ${pkgs.exim}/bin/exim -Mt "$mail"
20 break
21 ;;
22 n*)
23 break
24 ;;
25 esac
26 done
27 echo '-------------------'
28 echo '-------------------'
29 echo '-------------------'
30 echo '-------------------'
31 echo '-------------------'
32 '';
33
34in
35pkgs.writers.writeBashBin "review-mail" ''
36 for mail in $(${pkgs.exim}/bin/exim -bp \
37 | ${pkgs.gnugrep}/bin/grep frozen \
38 | ${pkgs.gawk}/bin/awk '{print $3}'); do
39 ${review} "$mail"
40 done
41''