diff --git a/dunlin.fnl b/dunlin.fnl index f92e0d3..0ff2cc2 100644 --- a/dunlin.fnl +++ b/dunlin.fnl @@ -2,11 +2,11 @@ (local lfs (require :lfs)) (local { : Gtk : Gdk : WebKit2 : cairo } lgi) -(local frame (require :frame)) -(local buffer (require :buffer)) +(local Frame (require :frame)) +(local Buffer (require :buffer)) -(let [f (frame.new) - b (buffer.new "main")] +(let [f (Frame.new) + b (Buffer.new "main")] (f:show-buffer b) (b:visit (.. "file://" (lfs.currentdir) "/doc/index.html"))) diff --git a/frame.fnl b/frame.fnl index c8bf28c..c94b0b1 100644 --- a/frame.fnl +++ b/frame.fnl @@ -1,6 +1,6 @@ (local { : Gtk : Gdk : WebKit2 : cairo } (require :lgi)) (local { : view } (require :fennel)) -(local command (require :command)) +(local Command (require :command)) (var frames []) @@ -19,7 +19,7 @@ commander (Gtk.Entry { :on_activate (fn [event] - (command.invoke event.text {})) + (Command.invoke event.text {})) }) progress-bar (Gtk.ProgressBar { :orientation Gtk.Orientation.HORIZONTAL