# HG changeset patch
# User Richard Westhaver <ellis@rwest.io>
# Date 1716588680 14400
# Node ID 494d3b93b29ba1f5f326c63cf46cb6fd95242b4a
# Parent  2b7f0c032fc7c99ab802c4e1ece76779f81e42e8
req fetch coping

diff -r 2b7f0c032fc7 -r 494d3b93b29b skelfile
--- a/skelfile	Fri May 24 14:51:25 2024 -0400
+++ b/skelfile	Fri May 24 18:11:20 2024 -0400
@@ -24,7 +24,7 @@
         #$find emacs -name '*.elc' -type f -delete$#
         #$find lisp -name '*.fasl' -type f -delete$#
         #$echo 'cargo clean:' && cd rust && cargo clean$#)
- (psl.dat ()
+ (psl.dat () ;; req:fetch works in slime and sk-shell but not here? hmm..
           (with-open-file (st ".stash/psl.dat" :direction :output :element-type 'octet)
             (loop for x across (req:get "https://publicsuffix.org/list/public_suffix_list.dat" :force-binary t)
                   do (write-byte x st))))
@@ -38,8 +38,8 @@
  (std (x) #$./x save std$#)
  (prelude (x) #$./x save prelude$#)
  (box () #$podman build . --build-arg IMAGE=box -t core$#)
- ;; x does the same thing, having issues with passing the shell input
- ;; to SKEL though.
+ ;; x does the same thing, but prompts for sudo -- having issues with
+ ;; passing the shell input to SKEL though.
  (install () #$d=/usr/local/bin
           cd .stash
           for f in $(find . -type f ! -name "*.*")
diff -r 2b7f0c032fc7 -r 494d3b93b29b x.lisp
--- a/x.lisp	Fri May 24 14:51:25 2024 -0400
+++ b/x.lisp	Fri May 24 18:11:20 2024 -0400
@@ -36,7 +36,7 @@
 (require 'sb-cltl2)
 (require 'sb-cover)
 (require 'sb-sprof)
-
+(use-package :sb-gray)
 ;; (require 'sb-aclrepl)
 (sb-ext:enable-debugger)
 (defvar *core-path* (directory-namestring #.(or *load-truename* *compile-file-truename* (error "run me as an executable!"))))