diff options
| author |  Alexander Foremny <aforemny@posteo.de> | 2025-02-19 14:21:15 +0100 |
|---|---|---|
| committer | Alexander Foremny <aforemny@posteo.de> | 2025-02-19 14:21:15 +0100 |
| commit | 9772e7f357585f567c7d93e138870f460f0342ab (patch) | |
| tree | 6358c949e01cade7fb31145b106ec834cb0ed707 | |
| parent | 7916df381a7832f01f6dafb83ab62d5095af808d (diff) | |
drop debug print
| -rw-r--r-- | src/Store/Query.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/Store/Query.hs b/src/Store/Query.hs index 84e22a7..5d375bd 100644 --- a/src/Store/Query.hs +++ b/src/Store/Query.hs @@ -54,7 +54,6 @@ query' (Delete c w) = do mapM (\fn -> fmap ((fn,) . fromValue c) . decodeFile c $ fn) =<< S.listFiles c let fps = map fst $ whereBy snd w (map (second (: [])) c') - lift $ print fps mapM_ S.deleteFile (map (c </>) fps) S.commit pure (J.toJSON ([] @())) |