             loc (loc-for-offset rloc line-start)]
         (if (and (#{:string, :string-body} (loc-tag loc)) (< (start-offset loc) line-start))
           t
-          (let [indent (indent-column rloc line-start)
+          (let [indent (indent-column rloc line-start force-two-spaces-indent)
                 cur-indent-col (- 
                                  (loop [o line-start]
                                    (if (>= o (.length text)) 


(defmethod paredit
  :paredit-newline
  [cmd {:keys #{parse-tree buffer}} {:keys [text offset length] :as t}]
  ; 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 

                   {:text text 
                    :offset (inc offset) 
                    :length 0 
                    :modifs [{:text *newline* :offset offset :length length}]}
                   :force-two-spaces-indent force-two-spaces-indent)]
    (if (-?> r :modifs count (= 2))
      (let [m1 (get-in r [:modifs 0])
            m2 (get-in r [:modifs 1])
