~ruther/guix-local: gnu: surf: Add 'dmenu' and 'xprop' to 'inputs'.

45321beb7d6cc92ff20ef1811bcc8119bb822ed9 — Mekeor Melire 9 years ago 909de13

gnu: surf: Add 'dmenu' and 'xprop' to 'inputs'.

'dmenu' and 'xprop' are necessary to open a new URL in surf.

* gnu/packages/suckless.scm (surf)[inputs]: Add dmenu and xprop.
[arguments]: Add 'set-dmenu-and-xprop-file-name' phase to patch the
paths to the 'dmenu' and 'xprop' binaries in surf's configuration file.

Signed-off-by: Kei Kebreau <kei@openmailbox.org>

patch browse .tar.gz

1 files changed, 12 insertions(+), 3 deletions(-)

M gnu/packages/suckless.scm

M gnu/packages/suckless.scm => gnu/packages/suckless.scm +12 -3

@@ 255,11 255,20 @@ drawing.")
                           (string-append "PREFIX=" %output))
        #:phases
        (modify-phases %standard-phases
-         (delete 'configure))))
+         (delete 'configure)
+         ;; Use the right file name for dmenu and xprop.
+         (add-before 'build 'set-dmenu-and-xprop-file-name
+           (lambda* (#:key inputs #:allow-other-keys)
+             (substitute* "config.def.h"
+               (("dmenu") (string-append (assoc-ref inputs "dmenu") "/bin/dmenu"))
+               (("xprop") (string-append (assoc-ref inputs "xprop") "/bin/xprop")))
+             #t)))))
     (inputs
-     `(("glib-networking" ,glib-networking)
+     `(("dmenu" ,dmenu)
+       ("glib-networking" ,glib-networking)
        ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
-       ("webkitgtk" ,webkitgtk/gtk+-2)))
+       ("webkitgtk" ,webkitgtk/gtk+-2)
+       ("xprop" ,xprop)))
     (native-inputs
      `(("pkg-config" ,pkg-config)))
     (home-page "http://surf.suckless.org/")