From 9193929177a1164c07482165db6a3c624c0544a1 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 31 Dec 2021 13:13:17 +0000
Subject: attic

---
 init.org | 22 +---------------------
 1 file changed, 1 insertion(+), 21 deletions(-)

(limited to 'init.org')

diff --git a/init.org b/init.org
index 454f712..711c997 100644
--- a/init.org
+++ b/init.org
@@ -19,21 +19,6 @@
             warning-suppress-types '((comp)))
     #+end_src
 * Initialisation
-*** Portability macros
-    #+begin_src emacs-lisp
-    (defmacro jao-syscase (clauses)
-      (let ((cls (assoc system-type clauses)))
-        (when cls `(progn ,@(cdr cls)))))
-
-    (defmacro jao-d-l (darw linux)
-      `(jao-syscase ((darwin ,darw) (gnu/linux ,linux))))
-
-    (defmacro jao-when-darwin (&rest body)
-      `(jao-syscase ((darwin ,@body))))
-
-    (defmacro jao-when-linux (&rest body)
-      `(jao-syscase ((gnu/linux ,@body))))
-    #+end_src
 *** Paths
     #+begin_src emacs-lisp
       (defvar jao-local-lisp-dir "~/lib/elisp"
@@ -473,11 +458,6 @@
     (setq bookmark-default-file "~/.emacs.d/emacs.bmk"
           bookmark-set-fringe-mark nil)
 
-    (use-package bookmark-view
-      :ensure t
-      :bind (("C-c v" . bookmark-view)
-             ("C-c B" . bookmark-set)))
-
     #+end_src
 *** Man pages
     #+begin_src emacs-lisp
@@ -2599,7 +2579,7 @@
                         (t "prolog")))))
     #+END_SRC
 *** Racket
-    #+begin_src emacs-lisp
+    #+begin_src emacs-lisp :tangle no
       (use-package racket-mode
         :ensure t
         :init (setq racket-show-functions '(racket-show-echo-area))
-- 
cgit v1.2.3