dan/eufon
1
0
Fork 0
Code Issues Pull Requests Releases Activity

add Just Browsing

Browse Source
This commit is contained in:
Daniel Barlow 2022-04-27 13:26:54 +01:00
parent 119f9f2427
commit 07ccbe1131
5 changed files with 14 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
default.nix
View File

@ -3,7 +3,9 @@
, fetchFromGitHub , fetchFromGitHub
, fennel , fennel
, glib-networking
, gobject-introspection , gobject-introspection
, webkitgtk
, gtk3 , gtk3
, gtk-layer-shell , gtk-layer-shell
, lua5_3 , lua5_3
@ -15,6 +17,7 @@ let
inherit (lua.pkgs) lgi buildLuaPackage; inherit (lua.pkgs) lgi buildLuaPackage;
inherit lua; inherit lua;
}; };
glib_networking_gio = "${glib-networking}/lib/gio/modules";
inifile = lua.pkgs.buildLuaPackage rec { inifile = lua.pkgs.buildLuaPackage rec {
pname = "inifile"; pname = "inifile";
name = "${pname}-${version}"; name = "${pname}-${version}";
@ -43,16 +46,20 @@ let
]); ]);
kiwmi = callPackage ./kiwmi.nix { lua = lua5_3; }; kiwmi = callPackage ./kiwmi.nix { lua = lua5_3; };
GIO_EXTRA_MODULES = "${glib-networking}/lib/gio/modules";
in in
stdenv.mkDerivation { stdenv.mkDerivation {
pname = "eufon"; pname = "eufon";
version = "0.1"; version = "0.1";
inherit GIO_EXTRA_MODULES;
buildInputs = [ buildInputs = [
luaWithPackages luaWithPackages
kiwmi kiwmi
glib-networking
gobject-introspection.dev gobject-introspection.dev
gtk-layer-shell gtk-layer-shell
gtk3 gtk3
webkitgtk
]; ];
src = ./.; src = ./.;

7
just/just.fnl
View File

@ -1,14 +1,13 @@
(local lgi (require :lgi)) (local lgi (require :lgi))
(local inspect (require :inspect))
(local { : Gtk : Gdk : WebKit2 : cairo } lgi) (local { : Gtk : Gdk : WebKit2 : cairo } lgi)
(if (os.getenv "JUST_HACKING") (if (os.getenv "JUST_HACKING")
(local {: view} (require :fennel))) (local {: view} (require :fennel)))
(local Listeners (require :listeners)) (local Listeners (require :just.listeners))
(local Webview (require :webview)) (local Webview (require :just.webview))
(local Viewplex (require :viewplex)) (local Viewplex (require :just.viewplex))
(local cache-dir (.. (os.getenv "HOME") "/.cache/just")) (local cache-dir (.. (os.getenv "HOME") "/.cache/just"))

4
just/viewplex.fnl
View File

@ -1,7 +1,7 @@
(local { : Gtk : Gdk : WebKit2 : cairo } (require :lgi)) (local { : Gtk : Gdk : WebKit2 : cairo } (require :lgi))
(local Webview (require :webview))
(local Listeners (require :listeners)) (local Webview (require :just.webview))
(local Listeners (require :just.listeners))
(local thumbnail-width 300) (local thumbnail-width 300)
(local thumbnail-height 200) (local thumbnail-height 200)

2
just/webview.fnl
View File

@ -1,7 +1,7 @@
(local { : Gtk : Gdk : WebKit2 : cairo : GLib : GObject } (require :lgi)) (local { : Gtk : Gdk : WebKit2 : cairo : GLib : GObject } (require :lgi))
(local posix (require :posix)) (local posix (require :posix))
(local Listeners (require :listeners)) (local Listeners (require :just.listeners))
;; this is a hack, should find out what XDG says ;; this is a hack, should find out what XDG says
(local downloads-directory (.. (os.getenv "HOME") "/" "Downloads")) (local downloads-directory (.. (os.getenv "HOME") "/" "Downloads"))

1
rc.fnl
View File

@ -14,4 +14,5 @@
(kiwmi:spawn "lua -l fennelrun modeline.fnl") (kiwmi:spawn "lua -l fennelrun modeline.fnl")
(kiwmi:spawn "lua -l fennelrun saturn/main.fnl") (kiwmi:spawn "lua -l fennelrun saturn/main.fnl")
(kiwmi:spawn "lua -l fennelrun crier/crier.fnl") (kiwmi:spawn "lua -l fennelrun crier/crier.fnl")
(kiwmi:spawn "lua -l fennelrun just/just.fnl")
;(kiwmi:spawn "foot") ;(kiwmi:spawn "foot")