summaryrefslogtreecommitdiffstats
path: root/src/Flameshot/Internal.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Flameshot/Internal.hs')
-rw-r--r--src/Flameshot/Internal.hs7
1 files changed, 0 insertions, 7 deletions
diff --git a/src/Flameshot/Internal.hs b/src/Flameshot/Internal.hs
index 44160bf..aba644c 100644
--- a/src/Flameshot/Internal.hs
+++ b/src/Flameshot/Internal.hs
@@ -9,7 +9,6 @@ import Blessings.Text
import Control.Concurrent.Async (race)
import Control.Concurrent.Extended
import Control.Exception
-import Data.ByteString (ByteString)
import qualified Data.Char as C
import Data.Function (on)
import Data.Maybe (fromMaybe)
@@ -107,12 +106,6 @@ showUnprintable =
toEither p =
map (\s -> if p (T.head s) then Right s else Left s)
. T.groupBy ((==) `on` p)
-
-
-copyToClipboard :: String -> ByteString -> IO ()
-copyToClipboard mimetype input =
- P.runAway "xclip" ["-selection", "clipboard", "-t", mimetype, "-i"]
- Nothing Nothing input Nothing mempty
logger :: (Blessings Text -> IO ()) -> Text -> P.Callbacks
logger putLog name =