diff --git a/.local/share/common-lisp/source/ambrevar/debug.lisp b/.local/share/common-lisp/source/ambrevar/debug.lisp
index 7b6cdf29..18a51ac1 100644
--- a/.local/share/common-lisp/source/ambrevar/debug.lisp
+++ b/.local/share/common-lisp/source/ambrevar/debug.lisp
@@ -3,7 +3,7 @@
   (:use :common-lisp)
   (:import-from #:serapeum #:export-always)
   (:import-from #:cl-ppcre))
-(in-package #:ambrevar/debug)
+(in-package ambrevar/debug)
 
 ;; TODO: Implement SLY function instead.
 ;; https://github.com/joaotavora/sly/issues/362
diff --git a/.local/share/common-lisp/source/ambrevar/emacs.lisp b/.local/share/common-lisp/source/ambrevar/emacs.lisp
index e7257e4d..dd651cc7 100644
--- a/.local/share/common-lisp/source/ambrevar/emacs.lisp
+++ b/.local/share/common-lisp/source/ambrevar/emacs.lisp
@@ -4,7 +4,7 @@
   (:use #:trivia)
   (:import-from #:serapeum #:export-always)
   (:import-from #:ambrevar/shell))
-(in-package #:ambrevar/emacs)
+(in-package ambrevar/emacs)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (trivial-package-local-nicknames:add-package-local-nickname :alex :alexandria)
   (trivial-package-local-nicknames:add-package-local-nickname :sera :serapeum))
diff --git a/.local/share/common-lisp/source/ambrevar/file.lisp b/.local/share/common-lisp/source/ambrevar/file.lisp
index 94e540a5..bba00bcd 100644
--- a/.local/share/common-lisp/source/ambrevar/file.lisp
+++ b/.local/share/common-lisp/source/ambrevar/file.lisp
@@ -4,7 +4,7 @@
   (:use #:trivia)
   (:import-from #:hu.dwim.defclass-star #:defclass*)
   (:import-from #:serapeum #:export-always))
-(in-package #:ambrevar/file)
+(in-package ambrevar/file)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (trivial-package-local-nicknames:add-package-local-nickname :alex :alexandria)
   (trivial-package-local-nicknames:add-package-local-nickname :sera :serapeum))
@@ -70,6 +70,8 @@ This returns the directory name for directories."
     (subseq path
             (1+ last-separator))))
 
+;; TODO: Support `*print-pretty*'?
+;; TODO: `*print-readably*'?
 (defmethod print-object ((file file) stream)
   (print-unreadable-object (file stream :type t :identity t)
     (write-string (str:concat (basename file)
diff --git a/.local/share/common-lisp/source/ambrevar/guix.lisp b/.local/share/common-lisp/source/ambrevar/guix.lisp
index d5a74d1f..25e714bc 100644
--- a/.local/share/common-lisp/source/ambrevar/guix.lisp
+++ b/.local/share/common-lisp/source/ambrevar/guix.lisp
@@ -4,7 +4,7 @@
   (:use #:trivia)
   (:import-from #:serapeum #:export-always)
   (:import-from #:ambrevar/shell))
-(in-package #:ambrevar/guix)
+(in-package ambrevar/guix)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (trivial-package-local-nicknames:add-package-local-nickname :alex :alexandria)
   (trivial-package-local-nicknames:add-package-local-nickname :sera :serapeum))
diff --git a/.local/share/common-lisp/source/ambrevar/shell.lisp b/.local/share/common-lisp/source/ambrevar/shell.lisp
index aba5a6d8..bcd26163 100644
--- a/.local/share/common-lisp/source/ambrevar/shell.lisp
+++ b/.local/share/common-lisp/source/ambrevar/shell.lisp
@@ -4,7 +4,7 @@
   (:use #:common-lisp)
   (:use #:trivia)
   (:import-from #:serapeum #:export-always))
-(in-package #:ambrevar/shell)
+(in-package ambrevar/shell)
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (trivial-package-local-nicknames:add-package-local-nickname :alex :alexandria)
   (trivial-package-local-nicknames:add-package-local-nickname :sera :serapeum))
diff --git a/.local/share/common-lisp/source/ambrevar/syspack.lisp b/.local/share/common-lisp/source/ambrevar/syspack.lisp
index 04c3cc01..b279c589 100644
--- a/.local/share/common-lisp/source/ambrevar/syspack.lisp
+++ b/.local/share/common-lisp/source/ambrevar/syspack.lisp
@@ -2,7 +2,7 @@
   (:documentation "ASDF and package management helpers")
   (:use :common-lisp)
   (:import-from #:serapeum #:export-always))
-(in-package #:ambrevar/syspack)
+(in-package ambrevar/syspack)
 
 (export-always 'exported-symbols)
 (declaim (ftype (function ((or symbol package))) exported-symbols))