changelog shortlog graph tags branches files raw help

Mercurial > core / changeset: req fetch coping

changeset 367: 494d3b93b29b
parent 366: 2b7f0c032fc7
child 368: 6c85d9131c3f
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 24 May 2024 18:11:20 -0400
files: skelfile x.lisp
description: req fetch coping
     1.1--- a/skelfile	Fri May 24 14:51:25 2024 -0400
     1.2+++ b/skelfile	Fri May 24 18:11:20 2024 -0400
     1.3@@ -24,7 +24,7 @@
     1.4         #$find emacs -name '*.elc' -type f -delete$#
     1.5         #$find lisp -name '*.fasl' -type f -delete$#
     1.6         #$echo 'cargo clean:' && cd rust && cargo clean$#)
     1.7- (psl.dat ()
     1.8+ (psl.dat () ;; req:fetch works in slime and sk-shell but not here? hmm..
     1.9           (with-open-file (st ".stash/psl.dat" :direction :output :element-type 'octet)
    1.10             (loop for x across (req:get "https://publicsuffix.org/list/public_suffix_list.dat" :force-binary t)
    1.11                   do (write-byte x st))))
    1.12@@ -38,8 +38,8 @@
    1.13  (std (x) #$./x save std$#)
    1.14  (prelude (x) #$./x save prelude$#)
    1.15  (box () #$podman build . --build-arg IMAGE=box -t core$#)
    1.16- ;; x does the same thing, having issues with passing the shell input
    1.17- ;; to SKEL though.
    1.18+ ;; x does the same thing, but prompts for sudo -- having issues with
    1.19+ ;; passing the shell input to SKEL though.
    1.20  (install () #$d=/usr/local/bin
    1.21           cd .stash
    1.22           for f in $(find . -type f ! -name "*.*")
     2.1--- a/x.lisp	Fri May 24 14:51:25 2024 -0400
     2.2+++ b/x.lisp	Fri May 24 18:11:20 2024 -0400
     2.3@@ -36,7 +36,7 @@
     2.4 (require 'sb-cltl2)
     2.5 (require 'sb-cover)
     2.6 (require 'sb-sprof)
     2.7-
     2.8+(use-package :sb-gray)
     2.9 ;; (require 'sb-aclrepl)
    2.10 (sb-ext:enable-debugger)
    2.11 (defvar *core-path* (directory-namestring #.(or *load-truename* *compile-file-truename* (error "run me as an executable!"))))