add dig to anoia

pkgs/watch-outputs/watch-outputs.fnl

@@ -1,4 +1,4 @@
-(local { : system : assoc : split : table= } (require :anoia))
+(local { : system : assoc : split : table= : dig } (require :anoia))
 (local svc (require :anoia.svc))
 (local { : view } (require :fennel))
 (local { : kill } (require :lualinux))
@@ -22,12 +22,6 @@
                                 :paths (split-paths paths)
                                 }))
 
-(fn dig [tree path]
-  (match path
-    [el & more] (dig (. tree el) more)
-    [el] (. tree el)
-    [] tree))
-
 (fn changed? [paths old-tree new-tree]
   (accumulate [changed? false
                _ path (ipairs paths)]