GNU bug report logs - #48450
[PATCH] gnu: Add jumpapp.

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 48450 in the body.
You can then email your comments to 48450 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: "Renzo Poddighe" <renzo <at> poddighe.nl>
To: guix-patches <at> gnu.org
Subject: [PATCH] gnu: Add jumpapp.
Date: Sat, 15 May 2021 20:46:02 +0200

From 55e4bfbac15074b0db604461b8c64b4e3daa15dc Mon Sep 17 00:00:00 2001
From: Renzo Poddighe <renzo <at> poddighe.nl>
Date: Sat, 15 May 2021 20:27:25 +0200
Subject: [PATCH] gnu: Add jumpapp.
To: guix-patches <at> gnu.org

* gnu/packages/xdisorg.scm (jumpapp-1.1): New variable.

Signed-off-by: Renzo Poddighe <renzo <at> poddighe.nl>
---
 gnu/packages/xdisorg.scm | 41 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 41 insertions(+)

diff --git a/gnu/packages/xdisorg.scm b/gnu/packages/xdisorg.scm
index b5bacd3d97..1d9366eeba 100644
--- a/gnu/packages/xdisorg.scm
+++ b/gnu/packages/xdisorg.scm
@@ -2796,3 +2796,44 @@ and execute @file{.desktop} files of the Application type.")
      "The @command{hsetroot} command composes wallpapers for X.
 This package is the fork of hsetroot by Hyriand.")
     (license license:gpl2+)))
+
+(define-public jumpapp
+  (package
+    (name "jumpapp")
+    (version "1.1")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/mkropat/jumpapp")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "1jrk4mm42sz6ca2gkb6w3dad53d4im4shpgsq8s4vr6xpl3b43ry"))))
+    (build-system gnu-build-system)
+    (arguments `(#:phases
+                 (modify-phases %standard-phases
+                   (delete 'configure)
+                   (delete 'check)
+                   (add-before 'install 'set-prefix-in-makefile
+                     (lambda* (#:key outputs #:allow-other-keys)
+                       (let ((out (assoc-ref outputs "out")))
+                         (substitute* "Makefile"
+                           (("PREFIX =.*")
+                            (string-append "PREFIX = " out "\n")))
+                         #true))))))
+    (propagated-inputs
+     `(("wmctrl" ,wmctrl)
+       ("xdotool" ,xdotool)
+       ("xprop" ,xprop)))
+    (native-inputs
+     `(("pandoc" ,pandoc)
+       ("perl" ,perl)))
+    (synopsis "Run-or-raise application switcher for any X11 desktop")
+    (description
+     "Bind a key for any given application that will launch the application,
+if it's not already running, or focus the application's window,if it is running.
+Pressing the key again will cycle to the application's next window,
+if there's more than one.")
+    (home-page "https://github.com/mkropat/jumpapp")
+    (license license:expat)))
-- 
2.31.1

Message #10 received at 48450-done <at> debbugs.gnu.org (full text, mbox):

From: Ludovic Courtès <ludo <at> gnu.org>
To: "Renzo Poddighe" <renzo <at> poddighe.nl>
Cc: 48450-done <at> debbugs.gnu.org
Subject: Re: bug#48450: [PATCH] gnu: Add jumpapp.
Date: Sat, 22 May 2021 23:44:05 +0200

Hi,

"Renzo Poddighe" <renzo <at> poddighe.nl> skribis:

>>From 55e4bfbac15074b0db604461b8c64b4e3daa15dc Mon Sep 17 00:00:00 2001
> From: Renzo Poddighe <renzo <at> poddighe.nl>
> Date: Sat, 15 May 2021 20:27:25 +0200
> Subject: [PATCH] gnu: Add jumpapp.
> To: guix-patches <at> gnu.org
>
> * gnu/packages/xdisorg.scm (jumpapp-1.1): New variable.
>
> Signed-off-by: Renzo Poddighe <renzo <at> poddighe.nl>

I added a copyright line for you (let me know if I got it wrong) and
committed.  Thanks!

Ludo’.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.