attic

1 files changed, 1 insertions, 21 deletions

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))