changelog shortlog graph tags branches files raw help

Mercurial > core / changeset: env stuff

changeset 368: 6c85d9131c3f
parent 367: 494d3b93b29b
child 369: de40bd522c84
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 24 May 2024 20:08:31 -0400
files: lisp/lib/skel/core/obj.lisp skelfile
description: env stuff
     1.1--- a/lisp/lib/skel/core/obj.lisp	Fri May 24 18:11:20 2024 -0400
     1.2+++ b/lisp/lib/skel/core/obj.lisp	Fri May 24 20:08:31 2024 -0400
     1.3@@ -12,6 +12,7 @@
     1.4 (defparameter *default-skel-license-kind* :mpl2)
     1.5 (declaim (type sk-project *skel-project*))
     1.6 (defvar *skel-project*)
     1.7+(defvar *skel-env*)
     1.8 ;; TODO (defvar *skelfile-boundary* nil "Set an upper bounds on how
     1.9 ;; many times and how far to walk an arbitrary file directory.")
    1.10 
    1.11@@ -453,8 +454,7 @@
    1.12                                               (sb-int:keywordicate e)
    1.13                                               (sb-posix:getenv (string-upcase e))))
    1.14                                      (list
    1.15-                                      (cons (sb-int:keywordicate (car e)) (cdr e)))))
    1.16-                                 
    1.17+                                      (cons (sb-int:keywordicate (car e)) (cadr e)))))
    1.18                                  env)))
    1.19           (when-let ((rules (sk-rules self)))
    1.20             (setf (sk-rules self) (map 'vector
     2.1--- a/skelfile	Fri May 24 18:11:20 2024 -0400
     2.2+++ b/skelfile	Fri May 24 20:08:31 2024 -0400
     2.3@@ -11,7 +11,7 @@
     2.4 :vc :hg
     2.5 :docs ((:org "readme"))
     2.6 :scripts "x.lisp"
     2.7-:env (home (cc "clang") shell term)
     2.8+:env ((cc "clang") shell term (psl-url "https://publicsuffix.org/lisp/public_suffix_list.dat"))
     2.9 :rules
    2.10 ((all (x compile std prelude build))
    2.11  (x ()