GNU bug report logs - #75955
[PATCH] gnu: Add annextimelog.

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 75955 in the body.
You can then email your comments to 75955 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: Matthias Riße <matrss <at> 0px.xyz>
To: guix-patches <at> gnu.org
Cc: Matthias Riße <matrss <at> 0px.xyz>
Subject: [PATCH] gnu: Add annextimelog.
Date: Thu, 30 Jan 2025 23:21:37 +0100

* gnu/packages/task-management.scm (annextimelog): New variable.

Change-Id: I7adf4263422fdb1edcb5dfc878cb1decb529c27e
---
 gnu/packages/task-management.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

diff --git a/gnu/packages/task-management.scm b/gnu/packages/task-management.scm
index af99c08a6a..11287ee8eb 100644
--- a/gnu/packages/task-management.scm
+++ b/gnu/packages/task-management.scm
@@ -113,6 +113,30 @@ (define-public clikan
 following the Japanese kanban (boarding) style.")
       (license license:expat))))
 
+(define-public annextimelog
+  (package
+    (name "annextimelog")
+    (version "0.14.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "annextimelog" version))
+       (sha256
+        (base32 "0m1q0pbjy7d4yvgkflg7208gmdrqn1cx346b4li0mlss1kr91hvz"))))
+    (build-system pyproject-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (replace 'check
+                    (lambda* (#:key tests? #:allow-other-keys)
+                      (when tests?
+                        (invoke "python" "-m" "unittest")))))))
+    (propagated-inputs (list python-rich python-tzdata))
+    (native-inputs (list python-poetry-core))
+    (home-page "https://gitlab.com/nobodyinperson/annextimelog")
+    (synopsis "Track time spent on projects, backed by Git Annex")
+    (description "Track time spent on projects, backed by Git Annex.")
+    (license license:gpl3+)))
+
 (define-public t-todo-manager
   ;; Last release is more than 10 years old.  Using latest commit.
   (let ((changeset "89ad444c000b")

base-commit: c788962baeeb6bf021b30c9ad774d472f592fdb5
-- 
2.47.1

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

From: Matthias Riße <matrss <at> mailbox.org>
To: 75955 <at> debbugs.gnu.org
Subject: Missing dependency
Date: Fri, 31 Jan 2025 00:08:49 +0100

[Message part 1 (text/plain, inline)]

I totally forgot the obvious dependency on git-annex, will revise...

[Message part 2 (text/html, inline)]

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

From: Matthias Riße <matrss <at> 0px.xyz>
To: 75955 <at> debbugs.gnu.org
Cc: Matthias Riße <matrss <at> 0px.xyz>
Subject: [PATCH v1] gnu: Add annextimelog.
Date: Fri, 31 Jan 2025 22:17:06 +0100

* gnu/packages/task-management.scm (annextimelog): New variable.

Change-Id: I7adf4263422fdb1edcb5dfc878cb1decb529c27e
---
 gnu/packages/task-management.scm | 38 ++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)

diff --git a/gnu/packages/task-management.scm b/gnu/packages/task-management.scm
index af99c08a6a..f02203d22f 100644
--- a/gnu/packages/task-management.scm
+++ b/gnu/packages/task-management.scm
@@ -45,6 +45,7 @@ (define-module (gnu packages task-management)
   #:use-module (gnu packages golang-xyz)
   #:use-module (gnu packages gstreamer)
   #:use-module (gnu packages gtk)
+  #:use-module (gnu packages haskell-apps)
   #:use-module (gnu packages hunspell)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages lua)
@@ -60,6 +61,7 @@ (define-module (gnu packages task-management)
   #:use-module (gnu packages ruby)
   #:use-module (gnu packages time)
   #:use-module (gnu packages tls)
+  #:use-module (gnu packages version-control)
   #:use-module (guix download)
   #:use-module (guix git-download)
   #:use-module (guix hg-download)
@@ -113,6 +115,42 @@ (define-public clikan
 following the Japanese kanban (boarding) style.")
       (license license:expat))))
 
+(define-public annextimelog
+  (package
+    (name "annextimelog")
+    (version "0.14.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (pypi-uri "annextimelog" version))
+       (sha256
+        (base32 "0m1q0pbjy7d4yvgkflg7208gmdrqn1cx346b4li0mlss1kr91hvz"))))
+    (build-system pyproject-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (replace 'check
+                    (lambda* (#:key tests? #:allow-other-keys)
+                      (when tests?
+                        (invoke "python" "-m" "unittest"))))
+                  (add-after 'create-entrypoints 'wrap-with-runtime-dependencies
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      (let ((bin (string-append (assoc-ref outputs "out")
+                                                "/bin")))
+                        (for-each (lambda (file)
+                                    (wrap-program file
+                                      `("PATH" ":" prefix
+                                        (,(dirname (which "git"))
+                                         ,(dirname (which "git-annex"))))))
+                                  (list (string-append bin "/annextimelog")
+                                        (string-append bin "/atl")))))))))
+    (propagated-inputs (list python-rich python-tzdata))
+    (inputs (list bash-minimal git git-annex))
+    (native-inputs (list python-poetry-core))
+    (home-page "https://gitlab.com/nobodyinperson/annextimelog")
+    (synopsis "Track time spent on projects, backed by Git Annex")
+    (description "Track time spent on projects, backed by Git Annex.")
+    (license license:gpl3+)))
+
 (define-public t-todo-manager
   ;; Last release is more than 10 years old.  Using latest commit.
   (let ((changeset "89ad444c000b")

base-commit: c788962baeeb6bf021b30c9ad774d472f592fdb5
-- 
2.47.1

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

From: Sharlatan Hellseher <sharlatanus <at> gmail.com>
To: 75955-done <at> debbugs.gnu.org
Subject: [PATCH] gnu: Add annextimelog.
Date: Mon, 03 Feb 2025 22:04:27 +0000

[Message part 1 (text/plain, inline)]

Hi,

Applied some changes:
 
--8<---------------cut here---------------start------------->8---
@@ -12,6 +12,7 @@
 ;;; Copyright © 2022 Matthew James Kraai <kraai <at> ftbfs.org>
 ;;; Copyright © 2024 Artyom V. Poptsov <poptsov.artyom <at> gmail.com>
 ;;; Copyright © 2025 Ricardo Wurmus <rekado <at> elephly.net>
+;;; Copyright © 2025 Matthias Riße <matrss <at> 0px.xyz>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -127,28 +128,35 @@ (define-public annextimelog
         (base32 "0m1q0pbjy7d4yvgkflg7208gmdrqn1cx346b4li0mlss1kr91hvz"))))
     (build-system pyproject-build-system)
     (arguments
-     '(#:phases (modify-phases %standard-phases
-                  (replace 'check
-                    (lambda* (#:key tests? #:allow-other-keys)
-                      (when tests?
-                        (invoke "python" "-m" "unittest"))))
-                  (add-after 'create-entrypoints 'wrap-with-runtime-dependencies
-                    (lambda* (#:key outputs #:allow-other-keys)
-                      (let ((bin (string-append (assoc-ref outputs "out")
-                                                "/bin")))
-                        (for-each (lambda (file)
-                                    (wrap-program file
-                                      `("PATH" ":" prefix
-                                        (,(dirname (which "git"))
-                                         ,(dirname (which "git-annex"))))))
-                                  (list (string-append bin "/annextimelog")
-                                        (string-append bin "/atl")))))))))
-    (propagated-inputs (list python-rich python-tzdata))
-    (inputs (list bash-minimal git git-annex))
-    (native-inputs (list python-poetry-core))
+     (list
+      #:test-flags #~(list "annextimelog/test.py")
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'create-entrypoints 'wrap-program
+            (lambda* (#:key outputs #:allow-other-keys)
+              (let ((bin (string-append #$output "/bin")))
+                (for-each (lambda (file)
+                            (wrap-program file
+                              `("PATH" ":" prefix
+                                (,(dirname (which "git"))
+                                 ,(dirname (which "git-annex"))))))
+                          (list (string-append bin "/annextimelog")
+                                (string-append bin "/atl")))))))))
+    (native-inputs
+     (list python-poetry-core
+           python-pytest))
+    (inputs
+     (list bash-minimal
+           git
+           git-annex))
+    (propagated-inputs
+     (list python-rich
+           python-tzdata))
     (home-page "https://gitlab.com/nobodyinperson/annextimelog")
-    (synopsis "Track time spent on projects, backed by Git Annex")
-    (description "Track time spent on projects, backed by Git Annex.")
+    (synopsis "Git Annex-backed Time Tracking")
+    (description
+     "This package provides a functionality to track time spent on projects,
+backed by Git Annex.")
     (license license:gpl3+)))
 
 (define-public t-todo-manager
--8<---------------cut here---------------end--------------->8---

Pushed to master as:
6964f7ad348 * gnu: Add annextimelog.

--
Thanks,
Oleg

[signature.asc (application/pgp-signature, inline)]

Previous Next

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