Try harder with :moveto and :copyto to find a unique folder

Author: maxauthority

muttator/NEWS

@@ -1,3 +1,7 @@
+201x-xx-xx:
+    * version 1.3
+    * Try harder with :moveto and :copyto to find a unique folder
+
 2013-10-13:
     * version 1.2
     * Fix unmappable key "-". (Use \- or '-' or "-")

muttator/content/mail.js

@@ -74,6 +74,9 @@ const Mail = Module("mail", {
 
     _moveOrCopy: function (copy, destinationFolder, operateOnThread) {
         let folders = mail.getFolders(destinationFolder);
+        if (folders.length > 1) {
+            folders = mail.getExactFolder(destinationFolder);
+        }
         if (folders.length == 0)
             return void liberator.echoerr("No matching folder for: " + destinationFolder);
         else if (folders.length > 1)
@@ -251,6 +254,22 @@ const Mail = Module("mail", {
         return folders;
     },
 
+    // returns an array of only one nsIMsgFolder object: an exact match to the filter
+    getExactFolder: function (filter, includeServers, includeMsgFolders) {
+        let folders = [];
+        if (!filter || filter == "") return folders;
+
+        filter = filter.toLowerCase();
+
+        for (let [row, name] in this.getAllFolderRowMap(includeServers, includeMsgFolders)) {
+            let folder = row._folder;
+            // XXX: row._folder.prettyName is needed ? -- teramako
+            if (name.toLowerCase() == filter)
+                folders.push(row._folder);
+        }
+        return folders;
+    },
+
     /**
      * returns array of nsIMsgFolder objects
      * @param {Number} flag