* bug#56667: test failures tests/channels.scm and tests/texlive.scm
@ 2022-07-20 14:29 Chris Keschnat via Bug reports for GNU Guix
2022-07-20 23:29 ` Ludovic Courtès
2022-07-22 20:50 ` Ludovic Courtès
0 siblings, 2 replies; 6+ messages in thread
From: Chris Keschnat via Bug reports for GNU Guix @ 2022-07-20 14:29 UTC (permalink / raw)
To: 56667
[-- Attachment #1: Type: text/plain, Size: 2553 bytes --]
Hello,
I am trying to follow "16.1 Building from Git"[1] but this results
in two test failures on my machine.
Initially I ran:
#+begin_src sh
git clone https://git.savannah.gnu.org/git/guix.git
cd guix
git fetch origin keyring:keyring
guix git authenticate 9edb3f66fd807b096b48283debdcddccfea34bad \
"BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"
guix environment guix --pure --ad-hoc help2man git strace
./bootstrap
./configure --localstatedir=/var
make && make check
#+end_src
Rerunning only the failed tests:
#+begin_src sh
make check TESTS="tests/channels.scm tests/texlive.scm"
#+end_src
Output:
#+begin_src sh
$ make check TESTS="tests/channels.scm tests/texlive.scm"
make check-recursive
make[1]: Entering directory '/home/ck/tmp/guix'
Making check in po/guix
make[2]: Entering directory '/home/ck/tmp/guix/po/guix'
make[2]: Nothing to be done for 'check'.
make[2]: Leaving directory '/home/ck/tmp/guix/po/guix'
Making check in po/packages
make[2]: Entering directory '/home/ck/tmp/guix/po/packages'
make[2]: Nothing to be done for 'check'.
make[2]: Leaving directory '/home/ck/tmp/guix/po/packages'
make[2]: Entering directory '/home/ck/tmp/guix'
Compiling Scheme modules...
Compiling Scheme modules...
Compiling Scheme modules...
Compiling Scheme modules...
make check-TESTS check-local
make[3]: Entering directory '/home/ck/tmp/guix'
make[4]: Entering directory '/home/ck/tmp/guix'
FAIL: tests/channels.scm
FAIL: tests/texlive.scm
============================================================================
Testsuite summary for GNU Guix 1.3.0.22336-479d9e
============================================================================
# TOTAL: 19
# PASS: 13
# SKIP: 4
# XFAIL: 0
# FAIL: 2
# XPASS: 0
# ERROR: 0
============================================================================
See ./test-suite.log
Please report to bug-guix@gnu.org
============================================================================
make[4]: *** [Makefile:5964: test-suite.log] Error 1
make[4]: Leaving directory '/home/ck/tmp/guix'
make[3]: *** [Makefile:6072: check-TESTS] Error 2
make[3]: Leaving directory '/home/ck/tmp/guix'
make[2]: *** [Makefile:6321: check-am] Error 2
make[2]: Leaving directory '/home/ck/tmp/guix'
make[1]: *** [Makefile:5849: check-recursive] Error 1
make[1]: Leaving directory '/home/ck/tmp/guix'
make: *** [Makefile:6323: check] Error 2
#+end_src
And results in the attached =test-suite.log=
[-- Attachment #2: test-suite.log --]
[-- Type: text/plain, Size: 41144 bytes --]
===================================================
GNU Guix 1.3.0.22336-479d9e: ./test-suite.log
===================================================
# TOTAL: 19
# PASS: 13
# SKIP: 4
# XFAIL: 0
# FAIL: 2
# XPASS: 0
# ERROR: 0
.. contents:: :depth: 2
FAIL: tests/channels
====================
test-name: channel-instance-metadata returns default if .guix-channel does not exist
location: /home/ck/tmp/guix/tests/channels.scm:117
source:
+ (test-equal
+ "channel-instance-metadata returns default if .guix-channel does not exist"
+ '("/" ())
+ (let ((metadata
+ (channel-instance-metadata instance--boring)))
+ (list (channel-metadata-directory metadata)
+ (channel-metadata-dependencies metadata))))
expected-value: ("/" ())
actual-value: ("/" ())
result: PASS
test-name: channel-instance-metadata and default dependencies
location: /home/ck/tmp/guix/tests/channels.scm:123
source:
+ (test-equal
+ "channel-instance-metadata and default dependencies"
+ '()
+ (channel-metadata-dependencies
+ (channel-instance-metadata instance--no-deps)))
expected-value: ()
actual-value: ()
result: PASS
test-name: channel-instance-metadata and directory
location: /home/ck/tmp/guix/tests/channels.scm:127
source:
+ (test-equal
+ "channel-instance-metadata and directory"
+ "/modules"
+ (channel-metadata-directory
+ (channel-instance-metadata
+ instance--sub-directory)))
expected-value: "/modules"
actual-value: "/modules"
result: PASS
test-name: channel-instance-metadata rejects unsupported version
location: /home/ck/tmp/guix/tests/channels.scm:132
source:
+ (test-equal
+ "channel-instance-metadata rejects unsupported version"
+ 1
+ (guard (c ((and (message-condition? c) (error-location? c))
+ (location-line (error-location c))))
+ (channel-instance-metadata
+ instance--unsupported-version)))
expected-value: 1
actual-value: 1
result: PASS
test-name: channel-instance-metadata returns <channel-metadata>
location: /home/ck/tmp/guix/tests/channels.scm:138
source:
+ (test-assert
+ "channel-instance-metadata returns <channel-metadata>"
+ (every (@@ (guix channels) channel-metadata?)
+ (map channel-instance-metadata
+ (list instance--no-deps
+ instance--simple
+ instance--with-dupes))))
actual-value: #t
result: PASS
test-name: channel-instance-metadata dependencies are channels
location: /home/ck/tmp/guix/tests/channels.scm:145
source:
+ (test-assert
+ "channel-instance-metadata dependencies are channels"
+ (let ((deps ((@@ (guix channels)
+ channel-metadata-dependencies)
+ (channel-instance-metadata instance--simple))))
+ (match deps (((? channel? dep)) #t) (_ #f))))
actual-value: #t
result: PASS
test-name: latest-channel-instances includes channel dependencies
location: /home/ck/tmp/guix/tests/channels.scm:152
source:
+ (test-assert
+ "latest-channel-instances includes channel dependencies"
+ (let* ((channel (channel (name 'test) (url "test")))
+ (test-dir
+ (channel-instance-checkout instance--simple)))
+ (mock ((guix git)
+ update-cached-checkout
+ (lambda* (url #:key ref starting-commit)
+ (match url
+ ("test" (values test-dir "caf3cabba9e" #f))
+ (_ (values
+ (channel-instance-checkout instance--no-deps)
+ "abcde1234"
+ #f)))))
+ (with-store
+ store
+ (let ((instances
+ (latest-channel-instances store (list channel))))
+ (and (eq? 2 (length instances))
+ (lset= eq?
+ '(test test-channel)
+ (map (compose
+ channel-name
+ channel-instance-channel)
+ instances))))))))
actual-value: #t
result: PASS
test-name: latest-channel-instances excludes duplicate channel dependencies
location: /home/ck/tmp/guix/tests/channels.scm:171
source:
+ (test-assert
+ "latest-channel-instances excludes duplicate channel dependencies"
+ (let* ((channel (channel (name 'test) (url "test")))
+ (test-dir
+ (channel-instance-checkout instance--with-dupes)))
+ (mock ((guix git)
+ update-cached-checkout
+ (lambda* (url #:key ref starting-commit)
+ (match url
+ ("test" (values test-dir "caf3cabba9e" #f))
+ (_ (values
+ (channel-instance-checkout instance--no-deps)
+ "abcde1234"
+ #f)))))
+ (with-store
+ store
+ (let ((instances
+ (latest-channel-instances store (list channel))))
+ (and (= 2 (length instances))
+ (lset= eq?
+ '(test test-channel)
+ (map (compose
+ channel-name
+ channel-instance-channel)
+ instances))
+ (find (lambda (instance)
+ (and (eq? (channel-name
+ (channel-instance-channel instance))
+ 'test-channel)
+ (string=?
+ (channel-commit
+ (channel-instance-channel instance))
+ "abc1234")))
+ instances)))))))
actual-value: #<<channel-instance> channel: #<<channel> name: test-channel url: "https://example.com/test-channel" branch: "master" commit: "abc1234" introduction: #f location: ((filename . "guix/channels.scm") (line . 262) (column . 19))> commit: "abcde1234" checkout: "/home/ck/tmp/guix/test-tmp/store/c2xcqhay4kldm6pncih8hfljyl1qyzxg-test-channel-abcde12">
result: PASS
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: git branch -m <name>
Initialized empty Git repository in /tmp/guix-directory.uBzMmx/.git/
[master (root-commit) 71b1ca8] first commit
1 file changed, 1 insertion(+)
create mode 100644 a.txt
[master a56a83a] second commit
1 file changed, 1 insertion(+)
create mode 100644 b.scm
test-name: latest-channel-instances #:validate-pull
location: /home/ck/tmp/guix/tests/channels.scm:201
source:
+ (test-equal
+ "latest-channel-instances #:validate-pull"
+ 'descendant
+ (let/ec
+ return
+ (with-temporary-git-repository
+ directory
+ '((add "a.txt" "A")
+ (commit "first commit")
+ (add "b.scm" "#t")
+ (commit "second commit"))
+ (with-repository
+ directory
+ repository
+ (let* ((commit1 (find-commit repository "first"))
+ (commit2 (find-commit repository "second"))
+ (spec (channel
+ (url (string-append "file://" directory))
+ (name 'foo)))
+ (new (channel
+ (inherit spec)
+ (commit (oid->string (commit-id commit2)))))
+ (old (channel
+ (inherit spec)
+ (commit (oid->string (commit-id commit1))))))
+ (define (validate-pull channel current commit relation)
+ (return
+ (and (eq? channel old)
+ (string=?
+ (oid->string (commit-id commit2))
+ current)
+ (string=?
+ (oid->string (commit-id commit1))
+ commit)
+ relation)))
+ (with-store
+ store
+ (latest-channel-instances
+ store
+ (list old)
+ #:current-channels
+ (list new)
+ #:validate-pull
+ validate-pull)))))))
expected-value: descendant
actual-value: descendant
result: PASS
test-name: channel-instances->manifest
location: /home/ck/tmp/guix/tests/channels.scm:234
source:
+ (test-assert
+ "channel-instances->manifest"
+ (let* ((spec (lambda deps
+ `(channel
+ (version 0)
+ (dependencies
+ ,@(map (lambda (dep)
+ `(channel
+ (name ,dep)
+ (url "http://example.org")))
+ deps)))))
+ (guix (make-instance #:name 'guix))
+ (instance0 (make-instance #:name 'a))
+ (instance1
+ (make-instance #:name 'b #:spec (spec 'a)))
+ (instance2
+ (make-instance #:name 'c #:spec (spec 'b)))
+ (instance3
+ (make-instance #:name 'd #:spec (spec 'c 'a))))
+ (%graft? #f)
+ (let ((source (channel-instance-checkout guix)))
+ (mkdir (string-append source "/build-aux"))
+ (call-with-output-file
+ (string-append
+ source
+ "/build-aux/build-self.scm")
+ (lambda (port)
+ (write '(begin
+ (use-modules (guix) (gnu packages bootstrap))
+ (lambda _ (package->derivation %bootstrap-guile)))
+ port))))
+ (with-store
+ store
+ (let ()
+ (define manifest
+ (run-with-store
+ store
+ (channel-instances->manifest
+ (list guix
+ instance0
+ instance1
+ instance2
+ instance3))))
+ (define entries (manifest-entries manifest))
+ (define (depends? drv in out)
+ (let ((set (list->set
+ (requisites
+ store
+ (list (derivation-file-name drv)))))
+ (in (map derivation-file-name in))
+ (out (map derivation-file-name out)))
+ (and (every (cut set-contains? set <>) in)
+ (not (any (cut set-contains? set <>) out)))))
+ (define (lookup name)
+ (run-with-store
+ store
+ (lower-object
+ (manifest-entry-item
+ (manifest-lookup
+ manifest
+ (manifest-pattern (name name)))))))
+ (let ((drv-guix (lookup "guix"))
+ (drv0 (lookup "a"))
+ (drv1 (lookup "b"))
+ (drv2 (lookup "c"))
+ (drv3 (lookup "d")))
+ (and (depends?
+ drv-guix
+ '()
+ (list drv0 drv1 drv2 drv3))
+ (depends? drv0 (list) (list drv1 drv2 drv3))
+ (depends? drv1 (list drv0) (list drv2 drv3))
+ (depends? drv2 (list drv1) (list drv3))
+ (depends? drv3 (list drv2 drv0) (list))))))))
actual-value: #t
result: PASS
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: git branch -m <name>
Initialized empty Git repository in /tmp/guix-directory.PVLRKX/.git/
[master (root-commit) 3af316b] the commit
1 file changed, 1 insertion(+)
create mode 100644 a.txt
test-name: channel-news, no news
location: /home/ck/tmp/guix/tests/channels.scm:311
source:
+ (test-equal
+ "channel-news, no news"
+ '()
+ (with-temporary-git-repository
+ directory
+ '((add "a.txt" "A") (commit "the commit"))
+ (with-repository
+ directory
+ repository
+ (let ((channel
+ (channel
+ (url (string-append "file://" directory))
+ (name 'foo)))
+ (latest (reference-name->oid repository "HEAD")))
+ (channel-news-for-commit
+ channel
+ (oid->string latest))))))
expected-value: ()
actual-value: ()
result: PASS
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: git branch -m <name>
Initialized empty Git repository in /tmp/guix-directory.rKMEVZ/.git/
[master (root-commit) b144c36] first commit
1 file changed, 1 insertion(+)
create mode 100644 .guix-channel
[master 842b1fb] second commit
1 file changed, 1 insertion(+)
create mode 100644 src/a.txt
[master b6bba6f] third commit
1 file changed, 1 insertion(+)
create mode 100644 news.scm
[master fa33342] fourth commit
1 file changed, 1 insertion(+)
create mode 100644 src/b.txt
[master b20d3d5] fifth commit
1 file changed, 1 insertion(+), 1 deletion(-)
test-name: channel-news, one entry
location: /home/ck/tmp/guix/tests/channels.scm:323
source:
+ (test-assert
+ "channel-news, one entry"
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel (version 0) (news-file "news.scm"))))
+ (commit "first commit")
+ (add "src/a.txt" "A")
+ (commit "second commit")
+ (tag "tag-for-first-news-entry")
+ (add "news.scm"
+ ,(lambda (repository)
+ (let ((previous
+ (reference-name->oid repository "HEAD")))
+ (object->string
+ `(channel-news
+ (version 0)
+ (entry (commit ,(oid->string previous))
+ (title (en "New file!") (eo "Nova dosiero!"))
+ (body (en "Yeah, a.txt."))))))))
+ (commit "third commit")
+ (add "src/b.txt" "B")
+ (commit "fourth commit")
+ (add "news.scm"
+ ,(lambda (repository)
+ (let ((second
+ (commit-id
+ (find-commit repository "second commit")))
+ (previous
+ (reference-name->oid repository "HEAD")))
+ (object->string
+ `(channel-news
+ (version 0)
+ (entry (commit ,(oid->string previous))
+ (title (en "Another file!"))
+ (body (en "Yeah, b.txt.")))
+ (entry (tag "tag-for-first-news-entry")
+ (title (en "Old news.") (eo "Malnova?oj."))
+ (body (en "For a.txt"))))))))
+ (commit "fifth commit"))
+ (with-repository
+ directory
+ repository
+ (define (find-commit* message)
+ (oid->string
+ (commit-id (find-commit repository message))))
+ (let ((channel
+ (channel
+ (url (string-append "file://" directory))
+ (name 'foo)))
+ (commit1 (find-commit* "first commit"))
+ (commit2 (find-commit* "second commit"))
+ (commit3 (find-commit* "third commit"))
+ (commit4 (find-commit* "fourth commit"))
+ (commit5 (find-commit* "fifth commit")))
+ (and (null? (channel-news-for-commit channel commit2))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit5))
+ (list commit2 commit4))
+ (lset= equal?
+ (map channel-news-entry-title
+ (channel-news-for-commit channel commit5))
+ '((("en" . "Another file!"))
+ (("en" . "Old news.") ("eo" . "Malnova?oj."))))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit3))
+ (list commit2))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit3 commit1))
+ (list commit2))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit5 commit3))
+ (list commit4))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit5 commit1))
+ (list commit4 commit2))
+ (lset= equal?
+ (map channel-news-entry-tag
+ (channel-news-for-commit channel commit5 commit1))
+ '(#f "tag-for-first-news-entry")))))))
actual-value: #f
result: FAIL
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: git branch -m <name>
Initialized empty Git repository in /tmp/guix-directory.uJnVw7/.git/
[master (root-commit) 50fcf19] first commit
2 files changed, 2 insertions(+)
create mode 100644 .guix-channel
create mode 100644 src/a.txt
[master 7cdd555] second commit
1 file changed, 1 insertion(+)
create mode 100644 news.scm
test-name: channel-news, annotated tag
location: /home/ck/tmp/guix/tests/channels.scm:411
source:
+ (test-assert
+ "channel-news, annotated tag"
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel (version 0) (news-file "news.scm"))))
+ (add "src/a.txt" "A")
+ (commit "first commit")
+ (tag "tag-for-first-news-entry"
+ "This is an annotated tag.")
+ (add "news.scm"
+ ,(lambda (repository)
+ (let ((previous
+ (reference-name->oid repository "HEAD")))
+ (object->string
+ `(channel-news
+ (version 0)
+ (entry (tag "tag-for-first-news-entry")
+ (title (en "New file!"))
+ (body (en "Yeah, a.txt."))))))))
+ (commit "second commit"))
+ (with-repository
+ directory
+ repository
+ (define (find-commit* message)
+ (oid->string
+ (commit-id (find-commit repository message))))
+ (let ((channel
+ (channel
+ (url (string-append "file://" directory))
+ (name 'foo)))
+ (commit1 (find-commit* "first commit"))
+ (commit2 (find-commit* "second commit")))
+ (and (null? (channel-news-for-commit channel commit1))
+ (lset= equal?
+ (map channel-news-entry-title
+ (channel-news-for-commit channel commit2))
+ '((("en" . "New file!"))))
+ (lset= string=?
+ (map channel-news-entry-tag
+ (channel-news-for-commit channel commit2))
+ (list "tag-for-first-news-entry"))
+ (lset= string=?
+ (map channel-news-entry-commit
+ (channel-news-for-commit channel commit2))
+ (list commit1)))))))
actual-value: #t
result: PASS
hint: Using 'master' as the name for the initial branch. This default branch name
hint: is subject to change. To configure the initial branch name to use in all
hint: of your new repositories, which will suppress this warning, call:
hint:
hint: git config --global init.defaultBranch <name>
hint:
hint: Names commonly chosen instead of 'master' are 'main', 'trunk' and
hint: 'development'. The just-created branch can be renamed via this command:
hint:
hint: git branch -m <name>
Initialized empty Git repository in /tmp/guix-directory.bnMluk/.git/
[master (root-commit) 5918529] first commit
1 file changed, 1 insertion(+)
create mode 100644 a.txt
[master 353ea72] second commit
1 file changed, 1 insertion(+)
create mode 100644 b.scm
test-name: latest-channel-instances, missing introduction for 'guix'
location: /home/ck/tmp/guix/tests/channels.scm:458
source:
+ (test-assert
+ "latest-channel-instances, missing introduction for 'guix'"
+ (with-temporary-git-repository
+ directory
+ '((add "a.txt" "A")
+ (commit "first commit")
+ (add "b.scm" "#t")
+ (commit "second commit"))
+ (with-repository
+ directory
+ repository
+ (let* ((commit1 (find-commit repository "first"))
+ (commit2 (find-commit repository "second"))
+ (channel
+ (channel
+ (url (string-append "file://" directory))
+ (name 'guix))))
+ (guard (c ((formatted-message? c)
+ (->bool
+ (string-contains
+ (formatted-message-string c)
+ "introduction"))))
+ (with-store
+ store
+ (latest-channel-instances store (list channel))
+ #f))))))
actual-value: #t
result: PASS
test-name: authenticate-channel, wrong first commit signer
location: /home/ck/tmp/guix/tests/channels.scm:479
source:
+ (test-equal
+ "authenticate-channel, wrong first commit signer"
+ #t
+ (with-fresh-gnupg-setup
+ (list %ed25519-public-key-file
+ %ed25519-secret-key-file
+ %ed25519-2-public-key-file
+ %ed25519-2-secret-key-file)
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel
+ (version 0)
+ (keyring-reference "master"))))
+ (add ".guix-authorizations"
+ ,(object->string
+ `(authorizations
+ (version 0)
+ ((,(key-fingerprint %ed25519-public-key-file)
+ (name "Charlie"))))))
+ (add "signer.key"
+ ,(call-with-input-file
+ %ed25519-public-key-file
+ get-string-all))
+ (commit
+ "first commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (add "random" ,(random-text))
+ (commit
+ "second commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file))))
+ (with-repository
+ directory
+ repository
+ (let* ((commit1 (find-commit repository "first"))
+ (commit2 (find-commit repository "second"))
+ (intro (make-channel-introduction
+ (commit-id-string commit1)
+ (openpgp-public-key-fingerprint
+ (read-openpgp-packet %ed25519-2-public-key-file))))
+ (channel
+ (channel
+ (name 'example)
+ (url (string-append "file://" directory))
+ (introduction intro))))
+ (guard (c ((formatted-message? c)
+ (and (string-contains
+ (formatted-message-string c)
+ "initial commit")
+ (equal?
+ (formatted-message-arguments c)
+ (list (oid->string (commit-id commit1))
+ (key-fingerprint %ed25519-public-key-file)
+ (key-fingerprint
+ %ed25519-2-public-key-file))))))
+ (authenticate-channel
+ channel
+ directory
+ (commit-id-string commit2)
+ #:keyring-reference-prefix
+ "")
+ 'failed))))))
result: SKIP
test-name: authenticate-channel, not a descendant of introductory commit
location: /home/ck/tmp/guix/tests/channels.scm:529
source:
+ (test-equal
+ "authenticate-channel, not a descendant of introductory commit"
+ #t
+ (with-fresh-gnupg-setup
+ (list %ed25519-public-key-file
+ %ed25519-secret-key-file
+ %ed25519-2-public-key-file
+ %ed25519-2-secret-key-file)
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel
+ (version 0)
+ (keyring-reference "master"))))
+ (add ".guix-authorizations"
+ ,(object->string
+ `(authorizations
+ (version 0)
+ ((,(key-fingerprint %ed25519-public-key-file)
+ (name "Charlie"))))))
+ (add "signer.key"
+ ,(call-with-input-file
+ %ed25519-public-key-file
+ get-string-all))
+ (commit
+ "first commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (branch "alternate-branch")
+ (checkout "alternate-branch")
+ (add "something.txt" ,(random-text))
+ (commit
+ "intro commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (checkout "master")
+ (add "random" ,(random-text))
+ (commit
+ "second commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file))))
+ (with-repository
+ directory
+ repository
+ (let* ((commit1 (find-commit repository "first"))
+ (commit2 (find-commit repository "second"))
+ (commit0
+ (commit-lookup
+ repository
+ (reference-target
+ (branch-lookup repository "alternate-branch"))))
+ (intro (make-channel-introduction
+ (commit-id-string commit0)
+ (openpgp-public-key-fingerprint
+ (read-openpgp-packet %ed25519-public-key-file))))
+ (channel
+ (channel
+ (name 'example)
+ (url (string-append "file://" directory))
+ (introduction intro))))
+ (guard (c ((formatted-message? c)
+ (and (string-contains
+ (formatted-message-string c)
+ "not a descendant")
+ (equal?
+ (formatted-message-arguments c)
+ (list (oid->string (commit-id commit2))
+ (oid->string (commit-id commit0)))))))
+ (authenticate-channel
+ channel
+ directory
+ (commit-id-string commit2)
+ #:keyring-reference-prefix
+ "")
+ 'failed))))))
result: SKIP
test-name: authenticate-channel, .guix-authorizations
location: /home/ck/tmp/guix/tests/channels.scm:587
source:
+ (test-equal
+ "authenticate-channel, .guix-authorizations"
+ #t
+ (with-fresh-gnupg-setup
+ (list %ed25519-public-key-file
+ %ed25519-secret-key-file
+ %ed25519-2-public-key-file
+ %ed25519-2-secret-key-file)
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel
+ (version 0)
+ (keyring-reference "channel-keyring"))))
+ (add ".guix-authorizations"
+ ,(object->string
+ `(authorizations
+ (version 0)
+ ((,(key-fingerprint %ed25519-public-key-file)
+ (name "Charlie"))))))
+ (commit "zeroth commit")
+ (add "a.txt" "A")
+ (commit
+ "first commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (add "b.txt" "B")
+ (commit
+ "second commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (add "c.txt" "C")
+ (commit
+ "third commit"
+ (signer
+ ,(key-fingerprint %ed25519-2-public-key-file)))
+ (branch "channel-keyring")
+ (checkout "channel-keyring")
+ (add "signer.key"
+ ,(call-with-input-file
+ %ed25519-public-key-file
+ get-string-all))
+ (add "other.key"
+ ,(call-with-input-file
+ %ed25519-2-public-key-file
+ get-string-all))
+ (commit "keyring commit")
+ (checkout "master"))
+ (with-repository
+ directory
+ repository
+ (let* ((commit1 (find-commit repository "first"))
+ (commit2 (find-commit repository "second"))
+ (commit3 (find-commit repository "third"))
+ (intro (make-channel-introduction
+ (commit-id-string commit1)
+ (openpgp-public-key-fingerprint
+ (read-openpgp-packet %ed25519-public-key-file))))
+ (channel
+ (channel
+ (name 'example)
+ (url (string-append "file://" directory))
+ (introduction intro))))
+ (and (authenticate-channel
+ channel
+ directory
+ (commit-id-string commit2)
+ #:keyring-reference-prefix
+ "")
+ (guard (c ((unauthorized-commit-error? c)
+ (and (oid=? (git-authentication-error-commit c)
+ (commit-id commit3))
+ (bytevector=?
+ (openpgp-public-key-fingerprint
+ (unauthorized-commit-error-signing-key c))
+ (openpgp-public-key-fingerprint
+ (read-openpgp-packet
+ %ed25519-2-public-key-file))))))
+ (authenticate-channel
+ channel
+ directory
+ (commit-id-string commit3)
+ #:keyring-reference-prefix
+ "")
+ 'failed)))))))
result: SKIP
test-name: latest-channel-instances, authenticate dependency
location: /home/ck/tmp/guix/tests/channels.scm:656
source:
+ (test-equal
+ "latest-channel-instances, authenticate dependency"
+ #t
+ (with-fresh-gnupg-setup
+ (list %ed25519-public-key-file
+ %ed25519-secret-key-file)
+ (with-temporary-git-repository
+ dependency-directory
+ `((add ".guix-channel"
+ ,(object->string
+ '(channel
+ (version 0)
+ (keyring-reference "master"))))
+ (add ".guix-authorizations"
+ ,(object->string `(authorizations (version 0) ())))
+ (add "signer.key"
+ ,(call-with-input-file
+ %ed25519-public-key-file
+ get-string-all))
+ (commit
+ "zeroth commit"
+ (signer
+ ,(key-fingerprint %ed25519-public-key-file)))
+ (add "foo.txt" "evil")
+ (commit "unsigned commit"))
+ (with-repository
+ dependency-directory
+ dependency
+ (let* ((commit0 (find-commit dependency "zeroth"))
+ (commit1 (find-commit dependency "unsigned"))
+ (intro `(channel-introduction
+ (version 0)
+ (commit ,(commit-id-string commit0))
+ (signer
+ ,(openpgp-format-fingerprint
+ (openpgp-public-key-fingerprint
+ (read-openpgp-packet
+ %ed25519-public-key-file)))))))
+ (with-temporary-git-repository
+ directory
+ `((add ".guix-channel"
+ ,(object->string
+ `(channel
+ (version 0)
+ (dependencies
+ (channel
+ (name test-channel)
+ (url ,dependency-directory)
+ (introduction ,intro))))))
+ (commit "single commit"))
+ (let ((channel (channel (name 'test) (url directory))))
+ (guard (c ((unsigned-commit-error? c)
+ (oid=? (git-authentication-error-commit c)
+ (commit-id commit1))))
+ (with-store
+ store
+ (latest-channel-instances store (list channel))
+ 'failed)))))))))
result: SKIP
Updating channel 'test' from Git repository at 'test'...
Updating channel 'test-channel' from Git repository at 'https://example.com/test-channel'...
Updating channel 'test' from Git repository at 'test'...
Updating channel 'test-channel' from Git repository at 'https://example.com/test-channel'...
Updating channel 'test-channel' from Git repository at 'https://example.com/test-channel'...
Updating channel 'foo' from Git repository at 'file:///tmp/guix-directory.uBzMmx'...
Updating channel 'guix' from Git repository at 'file:///tmp/guix-directory.bnMluk'...
FAIL: tests/texlive
===================
(package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl))
;;; (fail (package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl)) #f)
test-name: texlive->guix-package
location: /home/ck/tmp/guix/tests/texlive.scm:161
source:
+ (test-assert
+ "texlive->guix-package"
+ (mock ((guix build svn)
+ svn-fetch
+ (lambda* (url
+ revision
+ directory
+ #:key
+ (svn-command "svn")
+ (user-name #f)
+ (password #f)
+ (recursive? #t))
+ (mkdir-p directory)
+ (with-output-to-file
+ (string-append directory "/foo")
+ (lambda () (display "source")))))
+ (let ((result
+ (texlive->guix-package
+ "texsis"
+ #:package-database
+ (lambda _ %fake-tlpdb))))
+ (match result
+ (('package
+ ('inherit
+ ('simple-texlive-package
+ "texlive-texsis"
+ ('list
+ "bibtex/bst/texsis/"
+ "doc/man/man1/"
+ "doc/otherformats/texsis/base/"
+ "tex/texsis/base/"
+ "tex/texsis/config/")
+ ('base32 (? string? hash))
+ #:trivial?
+ #t))
+ ('propagated-inputs
+ ('list
+ 'texlive-cm
+ 'texlive-hyphen-base
+ 'texlive-knuth-lib
+ 'texlive-plain
+ 'texlive-tex))
+ ('home-page "https://www.tug.org/texlive/")
+ ('synopsis "Plain TeX macros for Physicists")
+ ('description (? string? description))
+ ('license 'lppl))
+ #t)
+ (_ (begin
+ (format #t "~s~%" result)
+ (pk 'fail result #f)))))))
actual-value: #f
result: FAIL
[-- Attachment #3: Type: text/plain, Size: 182 bytes --]
Am I doing anything wrong? I tried reading the results but cannot figure
out what is wrong.
.
[1] https://guix.gnu.org/manual/en/html_node/Building-from-Git.html
Thank you
Chris
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#56667: test failures tests/channels.scm and tests/texlive.scm
2022-07-20 14:29 bug#56667: test failures tests/channels.scm and tests/texlive.scm Chris Keschnat via Bug reports for GNU Guix
@ 2022-07-20 23:29 ` Ludovic Courtès
2022-07-21 7:58 ` Chris Keschnat via Bug reports for GNU Guix
2022-07-22 20:50 ` Ludovic Courtès
1 sibling, 1 reply; 6+ messages in thread
From: Ludovic Courtès @ 2022-07-20 23:29 UTC (permalink / raw)
To: Chris Keschnat; +Cc: 56667
Hi,
Chris Keschnat <chris@catsu.it> skribis:
> test-name: channel-news, one entry
> location: /home/ck/tmp/guix/tests/channels.scm:323
> source:
> + (test-assert
> + "channel-news, one entry"
[...]
> + (entry (tag "tag-for-first-news-entry")
> + (title (en "Old news.") (eo "Malnova?oj."))
The question mark above suggests you were not running the test in a
Unicode-capable locale. I think you may need to first run:
export LC_ALL=en_US.UTF-8
or something similar.
Could you check whether that helps?
> FAIL: tests/texlive
> ===================
>
> (package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl))
>
> ;;; (fail (package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl)) #f)
> test-name: texlive->guix-package
> location: /home/ck/tmp/guix/tests/texlive.scm:161
Hmm this one is unclear; it passes on my laptop. Needs more
investigation…
Thanks for reporting the issue!
Ludo’.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#56667: test failures tests/channels.scm and tests/texlive.scm
2022-07-20 23:29 ` Ludovic Courtès
@ 2022-07-21 7:58 ` Chris Keschnat via Bug reports for GNU Guix
0 siblings, 0 replies; 6+ messages in thread
From: Chris Keschnat via Bug reports for GNU Guix @ 2022-07-21 7:58 UTC (permalink / raw)
To: Ludovic Courtès; +Cc: 56667
Ludovic Courtès <ludo@gnu.org> writes:
> Hi,
>
> Chris Keschnat <chris@catsu.it> skribis:
>
>> test-name: channel-news, one entry
>> location: /home/ck/tmp/guix/tests/channels.scm:323
>> source:
>> + (test-assert
>> + "channel-news, one entry"
>
> [...]
>
>> + (entry (tag "tag-for-first-news-entry")
>> + (title (en "Old news.") (eo "Malnova?oj."))
>
> The question mark above suggests you were not running the test in a
> Unicode-capable locale. I think you may need to first run:
>
> export LC_ALL=en_US.UTF-8
>
> or something similar.
>
> Could you check whether that helps?
Hi Ludovic,
thank you, that does indeed make the test pass.
> [...]
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#56667: test failures tests/channels.scm and tests/texlive.scm
2022-07-20 14:29 bug#56667: test failures tests/channels.scm and tests/texlive.scm Chris Keschnat via Bug reports for GNU Guix
2022-07-20 23:29 ` Ludovic Courtès
@ 2022-07-22 20:50 ` Ludovic Courtès
2022-07-22 21:04 ` Ricardo Wurmus
1 sibling, 1 reply; 6+ messages in thread
From: Ludovic Courtès @ 2022-07-22 20:50 UTC (permalink / raw)
To: Chris Keschnat; +Cc: Ricardo Wurmus, 56667
Hi,
Chris Keschnat <chris@catsu.it> skribis:
> FAIL: tests/texlive
> ===================
>
> (package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl))
>
> ;;; (fail (package (inherit (simple-texlive-package "texlive-texsis" (list "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/" "tex/texsis/base/" "tex/texsis/config/") (base32 "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial? #t)) (version "59745") (propagated-inputs (list texlive-cm texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex)) (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX macros for Physicists") (description "TeXsis is a TeX macro package which provides useful features for typesetting\nresearch papers and related documents. For example, it includes support\nspecifically for: Automatic numbering of equations, figures, tables and\nreferences; Simplified control of type sizes, line spacing, footnotes, running\nheadlines and footlines, and tables of contents, figures and tables; Specialized\ndocument formats for research papers, preprints and \"e-prints\", conference\nproceedings, theses, books, referee reports, letters, and memoranda; Simplified\nmeans of constructing an index for a book or thesis; Easy to use double column\nformatting; Specialized environments for lists, theorems and proofs, centered or\nnon-justified text, and listing computer code; Specialized macros for easily\nconstructing ruled tables. TeXsis was originally developed for physicists, but\nothers may also find it useful. It is completely compatible with Plain TeX.") (license lppl)) #f)
> test-name: texlive->guix-package
> location: /home/ck/tmp/guix/tests/texlive.scm:161
Actually I’m now experiencing it, and I think it’s caused by commit
be7b314f3fe22273e935accac22f313e44d3d970, which changes the ‘texlive’
importer.
Ricardo, WDYT?
Thanks,
Ludo’.
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#56667: test failures tests/channels.scm and tests/texlive.scm
2022-07-22 20:50 ` Ludovic Courtès
@ 2022-07-22 21:04 ` Ricardo Wurmus
2024-09-01 8:26 ` Nicolas Goaziou via Bug reports for GNU Guix
0 siblings, 1 reply; 6+ messages in thread
From: Ricardo Wurmus @ 2022-07-22 21:04 UTC (permalink / raw)
To: Ludovic Courtès; +Cc: Chris Keschnat, 56667
Ludovic Courtès <ludo@gnu.org> writes:
> Hi,
>
> Chris Keschnat <chris@catsu.it> skribis:
>
>> FAIL: tests/texlive
>> ===================
>>
>> (package (inherit (simple-texlive-package "texlive-texsis" (list
>> "bibtex/bst/texsis/" "doc/man/man1/" "doc/otherformats/texsis/base/"
>> "tex/texsis/base/" "tex/texsis/config/") (base32
>> "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial?
>> #t)) (version "59745") (propagated-inputs (list texlive-cm
>> texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex))
>> (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX
>> macros for Physicists") (description "TeXsis is a TeX macro package
>> which provides useful features for typesetting\nresearch papers and
>> related documents. For example, it includes support\nspecifically
>> for: Automatic numbering of equations, figures, tables
>> and\nreferences; Simplified control of type sizes, line spacing,
>> footnotes, running\nheadlines and footlines, and tables of contents,
>> figures and tables; Specialized\ndocument formats for research
>> papers, preprints and \"e-prints\", conference\nproceedings, theses,
>> books, referee reports, letters, and memoranda; Simplified\nmeans of
>> constructing an index for a book or thesis; Easy to use double
>> column\nformatting; Specialized environments for lists, theorems and
>> proofs, centered or\nnon-justified text, and listing computer code;
>> Specialized macros for easily\nconstructing ruled tables. TeXsis
>> was originally developed for physicists, but\nothers may also find
>> it useful. It is completely compatible with Plain TeX.") (license
>> lppl))
>>
>> ;;; (fail (package (inherit (simple-texlive-package "texlive-texsis"
>> (list "bibtex/bst/texsis/" "doc/man/man1/"
>> "doc/otherformats/texsis/base/" "tex/texsis/base/"
>> "tex/texsis/config/") (base32
>> "17ckkii656y2g1h5h8lc1bsy10a0bfgnsakhxii4hxfmvrfvc097") #:trivial?
>> #t)) (version "59745") (propagated-inputs (list texlive-cm
>> texlive-hyphen-base texlive-knuth-lib texlive-plain texlive-tex))
>> (home-page "https://www.tug.org/texlive/") (synopsis "Plain TeX
>> macros for Physicists") (description "TeXsis is a TeX macro package
>> which provides useful features for typesetting\nresearch papers and
>> related documents. For example, it includes support\nspecifically
>> for: Automatic numbering of equations, figures, tables
>> and\nreferences; Simplified control of type sizes, line spacing,
>> footnotes, running\nheadlines and footlines, and tables of contents,
>> figures and tables; Specialized\ndocument formats for research
>> papers, preprints and \"e-prints\", conference\nproceedings, theses,
>> books, referee reports, letters, and memoranda; Simplified\nmeans of
>> constructing an index for a book or thesis; Easy to use double
>> column\nformatting; Specialized environments for lists, theorems and
>> proofs, centered or\nnon-justified text, and listing computer code;
>> Specialized macros for easily\nconstructing ruled tables. TeXsis
>> was originally developed for physicists, but\nothers may also find
>> it useful. It is completely compatible with Plain TeX.") (license
>> lppl)) #f)
>> test-name: texlive->guix-package
>> location: /home/ck/tmp/guix/tests/texlive.scm:161
>
> Actually I’m now experiencing it, and I think it’s caused by commit
> be7b314f3fe22273e935accac22f313e44d3d970, which changes the ‘texlive’
> importer.
My apologies. Fixed with commit c9a37f57cbb18be01436a709cbdd96ffea41caf5.
--
Ricardo
^ permalink raw reply [flat|nested] 6+ messages in thread
* bug#56667: test failures tests/channels.scm and tests/texlive.scm
2022-07-22 21:04 ` Ricardo Wurmus
@ 2024-09-01 8:26 ` Nicolas Goaziou via Bug reports for GNU Guix
0 siblings, 0 replies; 6+ messages in thread
From: Nicolas Goaziou via Bug reports for GNU Guix @ 2024-09-01 8:26 UTC (permalink / raw)
To: 56667-done
> My apologies. Fixed with commit
> c9a37f57cbb18be01436a709cbdd96ffea41caf5.
Closing the issue.
^ permalink raw reply [flat|nested] 6+ messages in thread
end of thread, other threads:[~2024-09-01 8:27 UTC | newest]
Thread overview: 6+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2022-07-20 14:29 bug#56667: test failures tests/channels.scm and tests/texlive.scm Chris Keschnat via Bug reports for GNU Guix
2022-07-20 23:29 ` Ludovic Courtès
2022-07-21 7:58 ` Chris Keschnat via Bug reports for GNU Guix
2022-07-22 20:50 ` Ludovic Courtès
2022-07-22 21:04 ` Ricardo Wurmus
2024-09-01 8:26 ` Nicolas Goaziou via Bug reports for GNU Guix
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).