          (ielm-mode . smartparens-strict-mode)
          (eshell-mode . smartparens-strict-mode))
   :config
+  (defun ar/backward-barf-sexp (&optional arg)
+    (interactive "P")
+    (if (eq major-mode 'org-mode)
+        (org-metaright)
+      (sp-backward-barf-sexp)))
+
+  (defun ar/backward-slurp-sexp (&optional arg)
+    (interactive "P")
+    (if (eq major-mode 'org-mode)
+        (org-metaleft)
+      (sp-backward-slurp-sexp)))
+
+  (defun ar/forward-barf-sexp (&optional arg)
+    (interactive "P")
+    (if (eq major-mode 'org-mode)
+        (left-word)
+      (sp-forward-barf-sexp)))
+
+  (defun ar/forward-slurp-sexp (&optional arg)
+    (interactive "P")
+    (if (eq major-mode 'org-mode)
+        (right-word)
+      (sp-forward-slurp-sexp)))
+
   (require 'smartparens-config)
   (require 'smartparens-html)
   (require 'smartparens-python)


(use-package re-builder
  :config
  ;; No double escaping needed.
  (ar/csetq reb-re-syntax 'string))

   ("M-[" . sp-backward-unwrap-sexp)
   ("M-]" . sp-unwrap-sexp)
   ("M-k" . sp-backward-kill-sexp)
   ("C-<right>" . ar/forward-slurp-sexp)
   ("C-<left>" . ar/forward-barf-sexp)
   ("M-<right>" . ar/backward-barf-sexp)
   ("M-<left>"  . ar/backward-slurp-sexp)
   ("C-M-f" . sp-forward-sexp)
   ("C-M-b" . sp-backward-sexp)
   ("C-M-n" . sp-forward-sexp)
