self: Remove the empty string from '%load-extensions'.

* guix/self.scm (guix-command): Set '%load-extensions'.

diff --git a/guix/self.scm b/guix/self.scm
index ca67f65..7cda665 100644 (file)
--- a/guix/self.scm
+++ b/guix/self.scm
@@ -649,6 +649,9 @@ load path."
 
   (program-file "guix-command"
                 #~(begin
+                    ;; Remove the empty extension from the search path.
+                    (set! %load-extensions '(".scm"))
+
                     (set! %load-path
                       (append (list (string-append #$module-directory
                                                    "/share/guile/site/"