#27 copy letter

mailanes.rb

@@ -311,7 +311,8 @@
   haml :letter, layout: :layout, locals: merged(
     title: "##{letter.id}",
     letter: letter,
-    lists: owner.lists
+    lists: owner.lists,
+    lanes: owner.lanes
   )
 end
 
@@ -337,6 +338,15 @@
   redirect "/letter?id=#{letter.id}"
 end
 
+post '/copy-letter' do
+  letter = owner.lanes.letter(params[:id].to_i)
+  lane = owner.lanes.lane(params[:lane].to_i)
+  copy = lane.letters.add(letter.title + ' / COPY')
+  copy.save_yaml(letter.yaml)
+  copy.save_liquid(letter.liquid)
+  redirect "/letter?id=#{copy.id}"
+end
+
 get '/toggle-letter' do
   letter = owner.lanes.letter(params[:id].to_i)
   letter.toggle

views/letter.haml

@@ -12,6 +12,8 @@
     Edit YAML and Liquid
   %a.item{onclick: '$("#test").show();'}
     Test Email
+  %a.item{onclick: '$("#copy").show();'}
+    Copy
 
 %p
   It belongs to the lane
@@ -60,3 +62,12 @@
   %input{type: 'submit', value: 'Test'}
   %label.small.gray
     The email will be sent to a random recipient from the given list.
+
+%form.hidden{method: 'POST', action: '/copy-letter', id: 'copy'}
+  %input{type: 'hidden', name: 'id', value: letter.id}
+  %select{name: 'lane'}
+    - lanes.all.each do |lane|
+      %option{value: lane.id}= "##{lane.id}: #{lane.title}"
+  %input{type: 'submit', value: 'Copy'}
+  %label.small.gray
+    A duplicate letter will be created in this lane.