Commit 26fc8b602ce2c4646b81b7b43c53a7a2aaf167f2
2022-03-29T20:24:36
config for OpenBSD
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89
diff --git a/.emacs b/.emacs
index e167e63..b44e557 100644
--- a/.emacs
+++ b/.emacs
@@ -16,17 +16,17 @@
(add-to-list 'auto-mode-alist '("\\.adams\\'" . lisp-mode))
;; Dart
-(add-hook 'dart-mode-hook 'lsp)
-(setq gc-cons-threshold (* 100 1024 1024)
- read-process-output-max (* 1024 1024)
- company-minimum-prefix-length 1
- lsp-lens-enable t
- lsp-signature-auto-activate nil)
+;(add-hook 'dart-mode-hook 'lsp)
+;(setq gc-cons-threshold (* 100 1024 1024)
+; read-process-output-max (* 1024 1024)
+; company-minimum-prefix-length 1
+; lsp-lens-enable t
+; lsp-signature-auto-activate nil)
;; Erlang
-(add-to-list 'load-path "/opt/homebrew/lib/erlang/lib/tools-3.5.2/emacs")
-(setq erlang-root-dir "/opt/homebrew/lib/erlang")
-(setq exec-path (cons "/opt/homebrew/lib/erlang/bin" exec-path))
+(add-to-list 'load-path "/usr/local/lib/erlang24/lib/tools-3.5.2/emacs")
+(setq erlang-root-dir "/usr/local/lib/erlang24")
+(setq exec-path (cons "/usr/local/lib/erlang24/bin" exec-path))
(require 'erlang-start)
;; Ruby
@@ -37,9 +37,9 @@
(require 'slime-autoloads)
(add-to-list 'slime-contribs 'slime-fancy)
(setq inferior-lisp-program
- "/opt/homebrew/bin/sbcl")
+ "/usr/local/bin/sbcl")
(setq common-lisp-hyperspec-root
- "/opt/homebrew/share/doc/hyperspec/HyperSpec/")
+ "/usr/local/share/doc/clisp-hyperspec/")
(setq common-lisp-hyperspec-symbol-table
(concat common-lisp-hyperspec-root "Data/Map_Sym.txt"))
(setq common-lisp-hyperspec-issuex-table
@@ -73,7 +73,7 @@
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
- '(default ((t (:inherit nil :extend nil :stipple nil :foreground "#000" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 100 :width normal :foundry "courier" :family "adobe"))))
+ '(default ((t (:inherit nil :extend nil :stipple nil :background "#eee" :foreground "#111" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 1 :width normal :foundry "default" :family "default"))))
'(fringe ((t (:background "white"))))
'(mode-line ((t (:background "gray" :foreground "black"))))
'(mode-line-inactive ((t (:inherit mode-line :background "grey" :foreground "gray30"))))
diff --git a/.profile b/.profile
index 1e20784..33f5f6a 100644
--- a/.profile
+++ b/.profile
@@ -9,4 +9,5 @@ export AUTOCONF_VERSION=2.69
export AUTOMAKE_VERSION=1.16
export CVSROOT="anoncvs@anoncvs.fr.openbsd.org:/cvs"
-alias emacs='TERM=xterm-256color emacs -nw'
+export LC_ALL=C.UTF-8
+export TERM=xterm-256color
diff --git a/.sbclrc b/.sbclrc
index 9162adc..08d9f0a 100644
--- a/.sbclrc
+++ b/.sbclrc
@@ -2,20 +2,6 @@
(declaim (optimize (debug 3) (safety 3) (speed 3)))
-;(require :asdf)
-
-;(setf (uiop:getenv "CC") "gcc")
-
-;(load "~/common-lisp/thodg/system/system")
(load "~/common-lisp/fare/asdf/build/asdf")
-(load "~/common-lisp/thodg/repo/repo")
+(load "~/common-lisp/kmx.io/repo/repo")
(repo:boot)
-
-;(defun sysdef-sbcl-contrib (x)
-; (probe-file (make-pathname
-; :directory "/usr/local/lib/sbcl/contrib/"
-; :name x
-; :type "asd")))
-
-;(pushnew 'sysdef-sbcl-contrib
-; package-system:*system-definition-search-functions*)