The test case below relies on /etc/groups and similar info that is not available in chroot builds, so skip it. --- scheme48-1.9/scheme/posix/check.scm 2013-05-11 21:55:36.000000000 +0200 +++ scheme48-1.9/scheme/posix/check.scm 2013-05-11 21:55:40.000000000 +0200 @@ -229,29 +229,7 @@ ; This assumes that we are not running as root and that / is owned by root. -(define-test-case users&groups posix-core-tests - (let ((my-info (get-file-info directory-name)) - (root-info (get-file-info "/"))) - (let ((my-user (user-id->user-info (file-info-owner my-info))) - (root-user (user-id->user-info (file-info-owner root-info))) - (my-group (group-id->group-info (file-info-group my-info))) - (root-group (group-id->group-info (file-info-group root-info)))) - (let ((my-other-user (name->user-info (user-info-name my-user))) - (my-other-group (name->group-info (group-info-name my-group)))) - (check-that (file-info-owner my-info) - (is user-id=? (user-info-id my-user))) - (check-that (file-info-owner root-info) - (opposite (is user-id=? (user-info-id my-user)))) - (check-that (file-info-group my-info) - (is group-id=? (group-info-id my-group))) - ;; doesn't work reliably - ;; (specifically, if the user is member of wheel) - ;; (check (not (group-id=? (file-info-group root-info) - ;; (group-info-id my-group)))) - (check-that (os-string->string (user-info-name root-user)) - (member-of '("root" - "bin" ; AIX - ))))))) + (define-test-case environment posix-core-tests (let ((env (reverse (environment-alist)))) ht' method='get' action='/guix/log/etc/snippets/text-mode'>
path: root/etc/snippets/text-mode
AgeCommit message (Expand)Author
2020-12-04etc: snippets: Fix name extraction....* etc/snippets/text-mode/guix-commit-message-add-package: Fix name extraction. This is a follow-up to 988a49c78ef19ad25cef543e2059a19db04bbd36. Nicolas Goaziou
2020-12-04etc: snippets: Fix name extraction....* etc/snippets/text-mode/guix-commit-message-update-package: Since git commit mode is not derived from any Lisp mode, so-called sexp or symbols do not include the period character. As a consequence, names including versions are not properly extracted. Also use more idiomatic (goto-char (point-min)) instead of (beginning-of-buffer). Nicolas Goaziou
2020-11-25etc: snippets: Fix "gnu: Add ..." name when prefilling Common Lisp commits me......* etc/snippets/text-mode/guix-commit-message-add-cl-package: Fix name and simplify the "New variables" line. Pierre Neidhardt
2020-11-23etc: snippets: Prefill Common Lisp package names....* etc/snippets/text-mode/guix-commit-message-add-cl-package: New file. Pierre Neidhardt
2020-11-23etc: snippets: Fix package name extraction....* etc/snippets/text-mode/guix-commit-message-add-package: Properly extract name when the diff contains a very short `define-public ...` above the actual new package. This can happen when the above package is a small inherited definition or cl/ecl package. Pierre Neidhardt