diff options
| author | Jan Sucan <jan@jansucan.com> | 2025-09-12 09:10:37 +0200 |
|---|---|---|
| committer | Jan Sucan <jan@jansucan.com> | 2025-09-12 09:10:37 +0200 |
| commit | 305837683782841b0d93dabc61e7e6e19df220b4 (patch) | |
| tree | a93a7e17dad1f278d56405ebc6b067d22ee61187 /ch23/23_a_1/PodCabalMain.hs | |
| parent | a5aafff8df0a00482d60ce98d891a4e1dd360d79 (diff) | |
23_a_1: Copy code of ch23 from the examples
Diffstat (limited to 'ch23/23_a_1/PodCabalMain.hs')
| -rw-r--r-- | ch23/23_a_1/PodCabalMain.hs | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/ch23/23_a_1/PodCabalMain.hs b/ch23/23_a_1/PodCabalMain.hs new file mode 100644 index 0000000..3810cb3 --- /dev/null +++ b/ch23/23_a_1/PodCabalMain.hs @@ -0,0 +1,10 @@ +{-- snippet all --}
+module Main where
+
+import qualified PodMainGUI
+import Paths_pod(getDataFileName)
+
+main =
+ do gladefn <- getDataFileName "podresources.glade"
+ PodMainGUI.main gladefn
+{-- /snippet all --}
|