bug#33180: guix pull fails in a directory with scm files

[Björn Höfling]

When my current working directory is within a guix checkout, it goes
wrong (I suppose this can happen with any scheme code?)

 which guix
/home/bjoern/.config/guix/current/bin/guix
# In guix/guix is my Guix checkout:
me:~/guix/guix/gnu/packages$ guix pull


;;; note: source file texinfo.scm
;;;       newer than compiled 
/gnu/store/p9wm67w3rfw3hlb9iljgvsfn84mz4w9d-guile-2.2.4/lib/guile/2.2/ccache/texinfo.go
Backtrace:
In ice-9/boot-9.scm:
   222:29 19 (map1 _)
   222:29 18 (map1 _)
   222:29 17 (map1 _)
   222:29 16 (map1 _)
   222:29 15 (map1 _)
   222:29 14 (map1 _)
   222:29 13 (map1 _)
   222:29 12 (map1 _)
   222:29 11 (map1 _)
   222:29 10 (map1 _)
   222:29  9 (map1 _)
   222:29  8 (map1 _)
   222:29  7 (map1 _)
   222:29  6 (map1 _)
   222:29  5 (map1 _)
   222:29  4 (map1 _)
   222:29  3 (map1 _)
   222:17  2 (map1 (((texinfo)) ((texinfo plain-text)) ((texinfo …))))
   2803:6  1 (resolve-interface _ #:select _ #:hide _ #:prefix _ # _ …)
In unknown file:
           0 (scm-error misc-error #f "~A ~S" ("no code for modu…" …) …)

ERROR: In procedure scm-error:
no code for module (texinfo)


cd
me:~$ guix pull
Updating channel 'guix-chromium' from Git repository at 
'https://gitlab.com/mbakke/guix-chromium.git'...
Updating channel 'guix' from Git repository at 
'https://git.savannah.gnu.org/git/guix.git'...

pgpQ_cWmotxUJ.pgp
Description: OpenPGP digital signature