;;;; QUOTE

(defpoll quote_text :interval "3600s" `./scripts/quote.sh`)

;;;; FETCH AND DATE

(defpoll host
  :initial-value ""
  :interval "1h"

  `echo $(whoami)@$(hostname)`
)

(defpoll time
  :interval "1s"
  :initial-value ""
  "date +'%H:%M:%S'"
)

(defpoll TODAY :interval "1s" `date +%m/%d/%y`)
(defpoll distro :interval "12h" "awk '/^ID=/' /etc/*-release | awk -F'=' '{ print tolower($2) }'")
(defpoll de :interval "12h" "echo $XDG_CURRENT_DESKTOP")
(defpoll shell :interval "5m" "echo $SHELL | awk -F'/' '{print $NF}'")
(defpoll packages :interval "5m" "pacman -Q | wc -l")

;;;; NOTES, MUSIC, NETWORKING

(defpoll NOTES :interval "1s" "cat -s ~/Documents/notes.txt")
(defpoll music_current :interval "1s" "mpc current")
(defpoll ssid :interval "1s" "iwgetid -r || echo 'Disconnected'")

;;;; App list LISTEN VAR
(defpoll search_listen :interval "5m" "scripts/search_items.txt")