diff --git a/autoload/surround.vim b/autoload/surround.vim
index e8bb44b..ec22b4e 100644
--- a/autoload/surround.vim
+++ b/autoload/surround.vim
@@ -234,6 +234,11 @@ function! surround#wrap(string,char,type,removed,special)
   elseif newchar == "\<C-[>" || newchar == "\<C-]>"
     let before = "{\n\t"
     let after  = "\n}"
+  elseif newchar ==# 'o'
+    let replacement = substitute(input(">> "),"\\\\r","\r", '')
+    let all    = s:process(replacement)
+    let before = s:extractbefore(all)
+    let after  =  s:extractafter(all)
   elseif newchar !~ '\a'
     let before = newchar
     let after  = newchar