 
 (defmethod paredit
   :paredit-newline
-  [cmd {:keys #{parse-tree buffer}} {:keys [text offset length] :as t}]
+  [cmd {:keys #{parse-tree buffer}} {:keys [text offset length] :as t} & {:keys [force-two-spaces-indent]}]
   ; no call to with-important-memoized because we almost immediately delegate to :paredit-indent-line
   (let [text (-> text (t/str-remove offset length) (t/str-insert offset "\n"))
         r (paredit :paredit-indent-line 

            (cond
              (nil? seen-loc) 
                (+ (loc-col loc) (loc-count loc) 1)
              (or (lisp-form? (loc-text (first seen-loc)))
                  (inline-implementation? (first seen-loc)))
                (+ (loc-col loc) (loc-count loc) 1)
              (second seen-loc)


(defn indent-column 
  "pre-condition: line-offset is already the starting offset of a line"
  [root-loc line-offset force-two-spaces-indent]
  (let [loc (loc-for-offset root-loc (dec line-offset))]
    (loop [loc (z/left loc) seen-loc nil indent 0]
      (cond
