diff options
| author | Camil Staps | 2019-10-23 08:50:07 +0200 |
|---|---|---|
| committer | Camil Staps | 2019-10-23 08:50:42 +0200 |
| commit | b6325f4e396400f6f9ef22346e3125982e88af3f (patch) | |
| tree | c61612acd85d0045c81e3f37b2aacbc90fc3cca7 | |
| parent | Add TraverseHandler for GtkSheet (diff) | |
Fix config; remove test
| -rw-r--r-- | config/Gtk.linux.env | 4 | ||||
| -rw-r--r-- | test/test.icl | 27 |
2 files changed, 2 insertions, 29 deletions
diff --git a/config/Gtk.linux.env b/config/Gtk.linux.env index df905cb..5c83ebb 100644 --- a/config/Gtk.linux.env +++ b/config/Gtk.linux.env @@ -11,7 +11,7 @@ Environments EnvironmentByteCodeStrip: lib/exe/bcstrip EnvironmentByteCodePrelink: lib/exe/bcprelink EnvironmentCodeGen: lib/exe/cg - EnvironmentLinker: /usr/bin/gcc::-Wl,--gc-sections -lgtk-3 -lgdk-3 -lpangocairo-1.0 -lpango-1.0 -latk-1.0 -lcairo-object -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lgobject-2.0 -lglib-2.0 + EnvironmentLinker: /usr/bin/gcc::-Wl,--gc-sections -lgtk-3 -lgdk-3 -lpangocairo-1.0 -lpango-1.0 -latk-1.0 -lcairo-gobject -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lgobject-2.0 -lglib-2.0 EnvironmentVersion: 920 EnvironmentRedirect: False EnvironmentCompileMethod: Pers @@ -28,7 +28,7 @@ Environments EnvironmentByteCodeStrip: lib/exe/bcstrip EnvironmentByteCodePrelink: lib/exe/bcprelink EnvironmentCodeGen: lib/exe/cg - EnvironmentLinker: /usr/bin/gcc::-Wl,--gc-sections -lgtk-3 -lgdk-3 -lpangocairo-1.0 -lpango-1.0 -latk-1.0 -lcairo-object -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lgobject-2.0 -lglib-2.0 -lgtksheet-4.0 + EnvironmentLinker: /usr/bin/gcc::-Wl,--gc-sections -lgtk-3 -lgdk-3 -lpangocairo-1.0 -lpango-1.0 -latk-1.0 -lcairo-gobject -lcairo -lgdk_pixbuf-2.0 -lgio-2.0 -lgobject-2.0 -lglib-2.0 -lgtksheet-4.0 EnvironmentVersion: 920 EnvironmentRedirect: False EnvironmentCompileMethod: Pers diff --git a/test/test.icl b/test/test.icl deleted file mode 100644 index 5341e9f..0000000 --- a/test/test.icl +++ /dev/null @@ -1,27 +0,0 @@ -module test - -import StdMaybe - -import Control.Applicative -import Control.Monad -import Control.Monad.Identity -import Control.Monad.State - -import Gtk - -Start w = runGtk app w -where - app = - newWindow "Hello!" Nothing >>= \window -> - installSignalHandler window (DestroyHandler quit) >>| - framed (Label "label") (newPaned Horizontal WideHandle) >>= \(paned,frame) -> - setMargins (margin 8) frame >>| - addToContainer frame window >>| - newTextView >>= \text_view_a -> - newTextView >>= \text_view_b -> - setMargins (margin 3) text_view_a >>| - setMargins (margin 3) text_view_b >>| - packPane1 text_view_a paned Resize NoShrink >>| - packPane2 text_view_b paned Resize NoShrink >>| - insertAtCursor "Hello" (getTextBuffer text_view_a) >>| - insertAtCursor "world!" (getTextBuffer text_view_b) |