fix(array): 🐛 last element of a dictionary is the last value sorted b…

…y keys (#614)

small fix also to the codec of copy_of_last_element

src/lua/zencode_array.lua

@@ -415,19 +415,19 @@ When("create the copy of last element in ''", function(obj_name)
         end
         ACK.copy_of_last_element = obj[#obj]
 
-        new_codec('copy_of_last_element', { encoding='string', zentype='element' })
+        new_codec('copy_of_last_element', { zentype='element' }, obj_name)
     elseif obj_codec.zentype == 'dictionary' then
         local elem = nil
-        for k, _ in sort_pairs(obj) do
-            elem = k
+        for _, v in sort_pairs(obj) do
+            elem = v
         end
         if not elem then
             error("Last element doesn't exist for empty dictionary")
         end
 
         ACK.copy_of_last_element = elem
 
-        new_codec('copy_of_last_element', { encoding='string', zentype='element' })
+        new_codec('copy_of_last_element', { zentype='element' }, obj_name)
     else
         error("Cannot find last element in " .. obj_codec.zentype)
     end

test/zencode/array.bats

@@ -797,5 +797,5 @@ Then print the 'last array'
 Then print the 'copy of last element'
 EOF
     save_output "last_element.json"
-    assert_output '{"copy_of_last_element":"key","last_array":"foo"}'
+    assert_output '{"copy_of_last_element":"val","last_array":"foo"}'
 }