summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins/ArchUpdates.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/Plugins/ArchUpdates.hs')
-rw-r--r--src/Xmobar/Plugins/ArchUpdates.hs36
1 files changed, 0 insertions, 36 deletions
diff --git a/src/Xmobar/Plugins/ArchUpdates.hs b/src/Xmobar/Plugins/ArchUpdates.hs
deleted file mode 100644
index 0dcfd04..0000000
--- a/src/Xmobar/Plugins/ArchUpdates.hs
+++ /dev/null
@@ -1,36 +0,0 @@
-{-# LANGUAGE CPP #-}
-
------------------------------------------------------------------------------
-
------------------------------------------------------------------------------
-
-{- |
-Module : Plugins.Monitors.ArchUpdates
-Copyright : (c) 2024 Enrico Maria De Angelis
-License : BSD-style (see LICENSE)
-
-Maintainer : Enrico Maria De Angelis <enricomaria.dean6elis@gmail.com>
-Stability : unstable
-Portability : unportable
-
-An ArchLinux updates availablility plugin for Xmobar
--}
-module Xmobar.Plugins.ArchUpdates (ArchUpdates (..)) where
-
-import Xmobar.Plugins.Command (Rate)
-import Xmobar.Plugins.PacmanUpdates (PacmanUpdates (PacmanUpdates))
-import Xmobar.Run.Exec
-
-data ArchUpdates = ArchUpdates (String, String, String) Rate
- deriving (Read, Show)
-
-intoPacmanUpdates :: ArchUpdates -> PacmanUpdates
-intoPacmanUpdates (ArchUpdates (z, o, m) r) =
- PacmanUpdates (z <> deprecation, o, m, "pacman: Unknown cause of failure.") r
- where
- deprecation = " <fc=#ff0000>(<action=`xdg-open https://codeberg.org/xmobar/xmobar/pulls/723`>deprecated plugin, click here</action>)</fc>"
-
-instance Exec ArchUpdates where
- alias = const "arch"
- rate = rate . intoPacmanUpdates
- run = run . intoPacmanUpdates