~ruther/guix-local

1ef4974be94d75d935d98399dcda44199a1fca47 — Janneke Nieuwenhuizen 2 years ago 4dd33fc
guix: shell: Don't whitelist / by typo in `shell-authorized-directories'.

Fixes <https://issues.guix.gnu.org/65832>.

* guix/scripts/shell.scm (authorized-shell-directory?): After warning,
continue LOOP to return valid query result for DIRECTORY.
1 files changed, 3 insertions(+), 1 deletions(-)

M guix/scripts/shell.scm
M guix/scripts/shell.scm => guix/scripts/shell.scm +3 -1
@@ 1,5 1,6 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2021-2023 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2023 Janneke Nieuwenhuizen <janneke@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;


@@ 232,7 233,8 @@ a hash-prefixed comment, or a blank line."
                                           (port-line port)
                                           (port-column port))))
                        (warning loc (G_ "ignoring invalid file name: '~a'~%")
                                 line))))))))))
                                 line)
                        (loop))))))))))
    (const #f)))

(define (options-with-caching opts)