wigust: Remove keynav.

* wigust/packages/xorg.scm (keynav): Remove variable.

1 files changed, 0 insertions, 61 deletions

diff --git a/wigust/packages/xorg.scm b/wigust/packages/xorg.scm
index 8c84ee9..6ab2c2c 100644
--- a/wigust/packages/xorg.scm
+++ b/wigust/packages/xorg.scm
@@ -88,64 +88,3 @@
     (description "libXss provides an X Window System client interface to the
 MIT-SCREEN-SAVER extension to the X11 protocol.")
     (license license:x11)))
-
-(define-public keynav
-  (package
-    (name "keynav")
-    (version "0.20110708.0")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append
-             "http://http.debian.net/debian/pool/main/k/keynav/keynav_"
-             version ".orig.tar.gz"))
-       (file-name (string-append name "-" version ".tar.gz"))
-       (sha256
-        (base32
-         "1gizjhji3yspxxxvb90js3z1bv18rbf5phxg8rciixpj3cccff8z"))))
-    (build-system gnu-build-system)
-    (inputs
-     `(("cairo" ,cairo)
-       ("glib" ,glib)
-       ("libx11" ,libx11)
-       ("libxext" ,libxext)
-       ("libxinerama" ,libxinerama)
-       ("libxtst" ,libxtst)
-       ("xdotool" ,xdotool)))
-    (native-inputs
-     `(("pkg-config" ,pkg-config)))
-    (arguments
-     `(#:tests? #f
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'setenv
-           (lambda _
-             (setenv "CC" (which "gcc"))))
-         (add-after 'unpack 'patch-keynav
-           (lambda _
-             (substitute* "keynav.c"
-               (("xdo_symbol_map") "xdo_get_symbol_map")
-               (("xdo_window_setclass") "xdo_set_window_class")
-               (("xdo_window_get_active") "xdo_get_window_at_mouse")
-               (("xdo_click") "xdo_click_window")
-               (("xdo_mouseup") "xdo_mouse_up")
-               (("xdo_mousedown") "xdo_mouse_down")
-               (("xdo_mousemove") "xdo_move_mouse")
-               (("xdo_mousemove_relative") "xdo_move_mouse_relative")
-               (("xdo_mouselocation") "xdo_get_mouse_location")
-               (("xdo_mouse_wait_for_move_to") "xdo_wait_for_mouse_move_to")
-               (("xdo_keysequence_up") "xdo_send_keysequence_window_up")
-               (("xdo_keysequence_down") "xdo_send_keysequence_window_down"))))
-         (delete 'configure)
-         (replace 'install
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out")))
-               (install-file "keynav" (string-append out "/bin"))
-               (install-file "keynavrc" (string-append out "/etc"))))))))
-    (home-page "https://www.semicomplete.com/projects/keynav/")
-    (synopsis "Keyboard-driven mouse cursor mover")
-    (description
-     "Keynav makes your keyboard a fast mouse cursor mover.  You can move the
-cursor to any point on the screen with a few key strokes.  It also simulates
-mouse click.  You can do everything mouse can do with a keyboard.")
-    (license license:bsd-3)))