packages feed

moffy-samples-gtk4 0.1.0.0 → 0.1.0.1

raw patch · 2 files changed

+8/−2 lines, 2 files

Files

app/Main.hs view
@@ -1,3 +1,4 @@+{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE LambdaCase #-} {-# OPTIONS_GHC -Wall -fno-warn-tabs #-} @@ -7,12 +8,17 @@ import Control.Moffy.Samples.Boxes import Control.Moffy.Samples.Boxes.Run.Gtk4 import Control.Moffy.Samples.Followbox+import Control.Moffy.Samples.FollowboxAnother qualified as A+import Control.Moffy.Samples.FollowboxOrigin qualified as O import Control.Moffy.Samples.Followbox.Run.Gtk4  main :: IO () main = getArgs >>= \case 	["boxes"] -> runBoxes boxes 	["followbox"] -> runFollowbox "firefox" followbox+	["followbox-another"] -> runFollowbox' "firefox" A.followbox+	["followbox-origin"] -> runFollowbox "firefox" O.followbox 	_ -> putStrLn $ 		"Usage: moffy_samples [SUBCOMMAND]\n\n" ++-		"Commands are\n\tboxes\n\tfollowbox"+		"Commands are\n\tboxes\n" +++		"\tfollowbox\n\tfollowbox-another\n\tfollowbox-origin"
moffy-samples-gtk4.cabal view
@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           moffy-samples-gtk4-version:        0.1.0.0+version:        0.1.0.1 synopsis:       Sample executables of moffy - GTK4 version description:    Please see the README on GitHub at <https://github.com/YoshikuniJujo/moffy-samples-gtk4#readme> category:       Control