diff --git a/bundle/bundle--package.el b/bundle/bundle--package.el
index 8684d6d0..78435a2a 100644
--- a/bundle/bundle--package.el
+++ b/bundle/bundle--package.el
@@ -413,7 +413,25 @@
              :machine-instance "u1"
              :remote-host "u1.metaebene.dev"
              :username "marcus")))
-    (push u1 slime-filename-translations)))
+    (push u1 slime-filename-translations))
+  ;; syntax highlighting
+  (defvar slime-repl-font-lock-keywords lisp-font-lock-keywords-2)
+  (defun slime-repl-font-lock-setup ()
+    (setq font-lock-defaults
+          '(slime-repl-font-lock-keywords
+            ;; From lisp-mode.el
+            nil nil (("+-*/.<>=!?$%_&~^:@" . "w")) nil
+            (font-lock-syntactic-face-function
+             . lisp-font-lock-syntactic-face-function))))
+  (add-hook 'slime-repl-mode-hook 'slime-repl-font-lock-setup)
+  (defadvice slime-repl-insert-prompt (after font-lock-face activate)
+    (let ((inhibit-read-only t))
+      (add-text-properties
+       slime-repl-prompt-start-mark (point)
+       '(font-lock-face
+         slime-repl-prompt-face
+         rear-nonsticky
+         (slime-repl-prompt read-only font-lock-face intangible))))))
 
 (use-package simple-httpd
   :defer t)