Immediately wuphf for messages in the past

frioux · Jun 16, 2019 · 8e77db6 · 8e77db6
1 parent 7691c65
commit 8e77db6
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/bin/enqueue-at b/bin/enqueue-at
@@ -5,10 +5,15 @@ perl -e 'exit 1 unless scalar grep m/^CREATE/, @ARGV' "$@" || exit
 
 cd ~/Dropbox/notes/.alerts
 
-for file in $(ls); do
+for file in *; do
    ts="$(echo "$file" | cut -f1 -d_)"
    contents=$(cat "$file")
 
-   echo "wuphf $contents" | at $(date -d "$ts" '+%H:%M %Y-%m-%d')
+   # if the ts is before now
+   if perl -e'exit 1 if shift gt shift' "$ts" "$(date -Iseconds)"; then
+      wuphf "$contents"
+   else
+      echo "wuphf $contents" | at "$(date -d "$ts" '+%H:%M %Y-%m-%d')"
+   fi
    rm "$file"
 done