                (save-excursion
                  (newline)
                  (lisp-indent-line)
-                 (indent-sexp))))
+                 (paredit-ignore-sexp-errors (indent-sexp)))))
           (t
            ;; Margin comment
            (indent-to comment-column 1) ; 1 -> force one leading space

       (memq (char-syntax (if endp (char-after) (char-before)))
             (list ?w ?_ ?\"
                   (let ((matching (matching-paren delimiter)))
                     (and matching (char-syntax matching)))))))

(defun paredit-move-past-close-and-reindent (close)

            (error (setq paredit-mode nil)
                   (signal (car condition) (cdr condition)))))))

(defun enable-paredit-mode ()
  "Turn on pseudo-structural editing of Lisp code."
  (interactive)
  (paredit-mode +1))

(defun disable-paredit-mode ()
  "Turn off pseudo-structural editing of Lisp code."
  (interactive)
  (paredit-mode -1))

