         "hh" 'merlin-document
         "ht" 'merlin-type-enclosing
         "hT" 'merlin-type-expr
-        "rd" 'merlin-destruct
-        ))))
+        "rd" 'merlin-destruct))))
 
 (defun ocaml/init-ocp-indent ()
   (use-package ocp-indent
     :defer t
     :init
     (add-hook 'tuareg-mode-hook 'ocp-indent-caml-mode-setup)))
+
+(defun ocaml/post-init-smartparens ()
+  (with-eval-after-load 'smartparens
+    ;; don't auto-close apostrophes (type 'a = foo) and backticks (`Foo)
+    (sp-local-pair 'tuareg-mode "'" nil :actions nil)
+    (sp-local-pair 'tuareg-mode "`" nil :actions nil)))
 
 (defun ocaml/init-tuareg ()
   (use-package tuareg

      (progn
        (with-eval-after-load 'merlin
          (setq merlin-error-after-save nil)
          (flycheck-ocaml-setup))
        ))))

(defun ocaml/init-merlin ()
  (use-package merlin

   ;; flycheck-ocaml
    merlin
    ocp-indent
    smartparens
    tuareg
    utop
    ))

(defun ocaml/post-init-company ()
  (spacemacs|add-company-hook merlin-mode))
