unofficial mirror of guix-patches@gnu.org 
 help / color / mirror / code / Atom feed
* [bug#68669] [PATCH 0/1] scripts: describe: Support 'channels-sans-intro' format for local checkouts.
@ 2024-01-23  7:23 Sergey Trofimov
  2024-01-23  7:25 ` [bug#68669] [PATCH 1/1] " Sergey Trofimov
  0 siblings, 1 reply; 3+ messages in thread
From: Sergey Trofimov @ 2024-01-23  7:23 UTC (permalink / raw)
  To: 68669
  Cc: Sergey Trofimov, Christopher Baines, Josselin Poiret,
	Ludovic Courtès, Mathieu Othacehe, Ricardo Wurmus,
	Simon Tournier, Tobias Geerinckx-Rice

Hi guix, I've noticed that `guix describe -f channels-sans-intro` doesn't work for local checkouts:

--8<---------------cut here---------------start------------->8---
$ guix describe -f channels-sans-intro
Backtrace:
In ice-9/boot-9.scm:
  1752:10  8 (with-exception-handler _ _ #:unwind? _ # _)
In unknown file:
           7 (apply-smob/0 #<thunk 7faea89112a0>)
In ice-9/boot-9.scm:
    724:2  6 (call-with-prompt _ _ #<procedure default-prompt-handle...>)
In ice-9/eval.scm:
    619:8  5 (_ #(#(#<directory (guile-user) 7faea8916c80>)))
In guix/ui.scm:
   2324:7  4 (run-guix . _)
  2287:10  3 (run-guix-command _ . _)
In ice-9/boot-9.scm:
  1752:10  2 (with-exception-handler _ _ #:unwind? _ # _)
In guix/scripts/describe.scm:
    163:4  1 (_)
In ice-9/boot-9.scm:
  1685:16  0 (raise-exception _ #:continuable? _)

ice-9/boot-9.scm:1685:16: In procedure raise-exception:
Throw to key `match-error' with args `("match" "no matching pattern" channels-sans-intro)'.
--8<---------------cut here---------------end--------------->8---


Sergey Trofimov (1):
  scripts: describe: Support 'channels-sans-intro' format for local
    checkouts.

 guix/scripts/describe.scm | 2 ++
 1 file changed, 2 insertions(+)


base-commit: ffc5fefce370f5fc01091869e13fdf525be1e0c0
--
2.41.0





^ permalink raw reply	[flat|nested] 3+ messages in thread

* [bug#68669] [PATCH 1/1] scripts: describe: Support 'channels-sans-intro' format for local checkouts.
  2024-01-23  7:23 [bug#68669] [PATCH 0/1] scripts: describe: Support 'channels-sans-intro' format for local checkouts Sergey Trofimov
@ 2024-01-23  7:25 ` Sergey Trofimov
  2024-01-24 22:11   ` bug#68669: " Ludovic Courtès
  0 siblings, 1 reply; 3+ messages in thread
From: Sergey Trofimov @ 2024-01-23  7:25 UTC (permalink / raw)
  To: 68669
  Cc: Sergey Trofimov, Christopher Baines, Josselin Poiret,
	Ludovic Courtès, Mathieu Othacehe, Ricardo Wurmus,
	Simon Tournier, Tobias Geerinckx-Rice

* guix/scripts/describe.scm (%display-checkout-info):
Support 'channels-sans-intro' format.
---
 guix/scripts/describe.scm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/guix/scripts/describe.scm b/guix/scripts/describe.scm
index 6d451dc902..449ab4b252 100644
--- a/guix/scripts/describe.scm
+++ b/guix/scripts/describe.scm
@@ -168,6 +168,8 @@ (define (display-checkout-info fmt)
        (format #t (G_ "  commit: ~a~%") (channel-commit channel)))
       ('channels
        (pretty-print `(list ,(channel->code channel))))
+      ('channels-sans-intro
+       (pretty-print `(list ,(channel->code channel #:include-introduction? #f))))
       ('json
        (display (channel->json channel))
        (newline))
-- 
2.41.0





^ permalink raw reply related	[flat|nested] 3+ messages in thread

* bug#68669: [PATCH 1/1] scripts: describe: Support 'channels-sans-intro' format for local checkouts.
  2024-01-23  7:25 ` [bug#68669] [PATCH 1/1] " Sergey Trofimov
@ 2024-01-24 22:11   ` Ludovic Courtès
  0 siblings, 0 replies; 3+ messages in thread
From: Ludovic Courtès @ 2024-01-24 22:11 UTC (permalink / raw)
  To: Sergey Trofimov
  Cc: Josselin Poiret, 68669-done, Simon Tournier, Mathieu Othacehe,
	Tobias Geerinckx-Rice, Ricardo Wurmus, Christopher Baines

Sergey Trofimov <sarg@sarg.org.ru> skribis:

> * guix/scripts/describe.scm (%display-checkout-info):
> Support 'channels-sans-intro' format.

Applied, thanks!




^ permalink raw reply	[flat|nested] 3+ messages in thread

end of thread, other threads:[~2024-01-24 22:12 UTC | newest]

Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2024-01-23  7:23 [bug#68669] [PATCH 0/1] scripts: describe: Support 'channels-sans-intro' format for local checkouts Sergey Trofimov
2024-01-23  7:25 ` [bug#68669] [PATCH 1/1] " Sergey Trofimov
2024-01-24 22:11   ` bug#68669: " Ludovic Courtès

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).