diff options
| author | jao <jao@gnu.org> | 2025-09-25 22:06:06 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-09-25 22:06:06 +0100 |
| commit | 5e2063941e48b16e96572e7c3469ef4a38328b9d (patch) | |
| tree | 2f36be0f47279784f16b1fc27872e5866cb377c9 /custom | |
| parent | 4de54b20152f272201b0b8f38f266bb6f5d1a4cd (diff) | |
| download | elibs-5e2063941e48b16e96572e7c3469ef4a38328b9d.tar.gz elibs-5e2063941e48b16e96572e7c3469ef4a38328b9d.tar.bz2 | |
ob-applescript
Diffstat (limited to 'custom')
| -rw-r--r-- | custom/jao-custom-programming.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/custom/jao-custom-programming.el b/custom/jao-custom-programming.el index 7fe3e7f..fa6e474 100644 --- a/custom/jao-custom-programming.el +++ b/custom/jao-custom-programming.el @@ -246,13 +246,6 @@ (eldoc-mode 1) (setq mode-name "λ")) - (defun jao-cider-test-ns (ns) - (let ((parts (string-split ns "\\."))) - (if (string= "test" (cadr parts)) - ns - (mapconcat #'identity - (cons (car parts) (cons "test" (cdr parts))) ".")))) - (defun jao-kaocha-file-name () (let* ((filename (match-string 2)) (path (replace-regexp-in-string "\\." "/" (match-string 1)))) @@ -292,7 +285,6 @@ cider-repl-use-pretty-printing t cider-show-error-buffer 'except-in-repl cider-test-show-report-on-success nil - cider-test-infer-test-ns #'jao-cider-test-ns cider-use-fringe-indicators nil cider-use-overlays nil clojure-docstring-fill-column 72 @@ -330,7 +322,8 @@ (use-package geiser-guile) (jao-load-path "geiser-chez") -(use-package geiser-chez) +(use-package geiser-chez + :init (setq geiser-chez-binary (jao-d-l "chez" "scheme"))) ;; (jao-load-path "geiser/mit") ;; (use-package geiser-mit) @@ -511,6 +504,13 @@ (use-package typescript-mode :ensure t :custom ((typescript-indent-level 2))) +;;;; Applescript + +(jao-when-darwin + (use-package ob-applescript + :after org + :ensure t + :demand t)) ;;; - (provide 'jao-custom-programming) |