changelog shortlog graph tags branches changeset files revisions annotate raw help

Mercurial > core / emacs/emacs.sk

changeset 680: 5f88b237ce29
parent: ca09f470abb3
author: Richard Westhaver <ellis@rwest.io>
date: Fri, 27 Sep 2024 20:19:10 -0400
permissions: -rw-r--r--
description: added skc, fixed alien c-string functions, upgrades and fixes for rocksdb/rdb
1 :name "core/emacs"
2 :path "emacs"
3 ;; :components ((:org "babel"))
4 ;; TODO 2024-09-23:
5 :bind ((dotemacs (merge-pathnames ".emacs.d/" (user-homedir-pathname)))
6  (config (directory "emacs/*.el"))
7  (lib (directory "emacs/lib/*.el")))
8 :rules
9 ((install ()
10  (flet ((el-write (in out)
11  (let* ((fn (file-namestring in)))
12  (println (format nil "~A -> ~A" fn out))
13  (std:with-open-files
14  ((in in :direction :input)
15  (out out :direction :output :if-exists :supersede))
16  (std:copy-stream in out :finish-output t)))))
17  (let ((dotemacs (merge-pathnames ".emacs.d/" (user-homedir-pathname)))
18  (config (directory "*.el"))
19  (lib (directory "lib/*.el")))
20  (mapcar
21  (lambda (el)
22  (el-write el (merge-pathnames (file-namestring el) dotemacs)))
23  config)
24  (mapcar
25  (lambda (el)
26  (el-write el
27  (merge-pathnames (file-namestring el)
28  (ensure-directories-exist
29  (merge-pathnames "lib/" dotemacs)))))
30  lib))))
31  (clean () #$rm -rf ~/.emacs.d/{*.el,lisp,site-lisp,lib,elpa$#))
32