feat: add more sanskrit dictionaries

configs/packages/default.nix

@@ -154,7 +154,7 @@ in {
     scripts.vg
     scripts.fkill
     scripts.wttr
-    scripts.boetlingk
+    scripts.sanskrit-dictionary
     scripts.unicodmenu
     scripts.trans
     scripts.liddel-scott-jones

packages/scripts/boetlingk.sh

@@ -1,9 +0,0 @@
-#!/bin/sh
-set -efu
-
-input="$*"
-
-curl -sSL "https://www.sanskrit-lexicon.uni-koeln.de/scans/PWScan/2020/web/webtc/getword.php?key=$input&filter=roman&accent=yes&transLit=hk" \
-  | pandoc --standalone --variable=title:"$input" --from=html --to=man \
-  | sed 's/\s\+\([:.,;]\)/\1/g;s/\s\+/ /g' \
-  | man --local-file --pager="bat -p" -

packages/scripts/default.nix

@@ -128,11 +128,35 @@ in rec {
     packages = [ pkgs.curl pkgs.pup betacode pkgs.gnused pkgs.pandoc pkgs.man ];
   };
 
-  boetlingk = wrapScript {
+  sanskrit-dictionary = pkgs.writers.writeDashBin "sa" ''
-    name = "boet";
+    set -efu
-    script = ./boetlingk.sh;
+
-    packages = [ pkgs.curl pkgs.gnused pkgs.pandoc pkgs.man ];
+    usage() {
-  };
+      echo "usage: $0 mw|mwe|boet|bopp|apte|boro TERM"
+      exit 1
+    }
+
+    [ $# -eq 2 ] || usage
+
+    case $1 in
+      mw) id=MWScan;;
+      mwe) id=MWEScan;;
+      bopp) id=BOPScan;;
+      boet) id=PWGScan;;
+      apte) id=AEScan;;
+      boro) id=BORScan;;
+      *) usage;;
+    esac
+
+    shift
+
+    input="$*"
+
+    ${pkgs.curl}/bin/curl -sSL "https://www.sanskrit-lexicon.uni-koeln.de/scans/$id/2020/web/webtc/getword.php?key=$input&filter=roman&accent=yes&transLit=hk" \
+      | ${pkgs.pandoc}/bin/pandoc --standalone --variable=title:"$input" --from=html --to=man \
+      | ${pkgs.gnused}/bin/sed 's/\s\+\([:.,;]\)/\1/g;s/\s\+/ /g' \
+      | ${pkgs.man}/bin/man --local-file --pager="${pkgs.bat}/bin/bat -p" -
+  '';
 
   playlist = import ./pls.nix { inherit pkgs; };
 

packages/scripts/sanskrit-dictionary.nix

@@ -0,0 +1,2 @@
+{ pkgs, id, name }: pkgs.writeDashBin name ''
+''