@sempervirens-labs/apple-mail-mcp 1.1.0 → 1.2.0

package/.claude/settings.local.json

@@ -9,7 +9,8 @@
       "Bash(osascript:*)",
       "Bash(npm publish:*)",
       "Bash(bun run build)",
-      "Bash(npx tsc:*)"
+      "Bash(npx tsc:*)",
+      "Bash(git push:*)"
     ]
   }
 }

package/README.md

@@ -234,6 +234,7 @@ Archive an email by moving it to the Archive mailbox.
 | `messageId` | number | **Yes** | - | Email ID (from mail_get_emails or mail_search) |
 | `account` | string | No | - | Account name |
 | `mailbox` | string | No | "INBOX" | Current mailbox of the email |
+| `archiveMailbox` | string | No | auto-detect | Name of the archive folder (auto-detects "Archive", "Archives", or "All Mail") |
 
 **Example response:**
 ```json

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@sempervirens-labs/apple-mail-mcp",
-  "version": "1.1.0",
+  "version": "1.2.0",
   "description": "MCP server for Apple Mail - list accounts, mailboxes, search emails, and send messages",
   "type": "module",
   "main": "src/index.ts",

package/src/applescript/mail.ts

@@ -362,32 +362,49 @@ export function archiveEmail(options: {
   messageId: number;
   account?: string;
   mailbox?: string;
+  archiveMailbox?: string;
 }): { success: boolean; message: string } {
-  const { messageId, account, mailbox = "INBOX" } = options;
+  const { messageId, account, mailbox = "INBOX", archiveMailbox: customArchiveMailbox } = options;
 
   const accountPart = account
     ? `mailbox "${mailbox}" of account "${account}"`
     : `mailbox "${mailbox}"`;
 
-  const script = `
-tell application "Mail"
-    try
-        set theMailbox to ${accountPart}
-        set theMessage to (first message of theMailbox whose id is ${messageId})
-        set theAccount to account of theMailbox
+  // If a custom archive mailbox is specified, use it directly
+  const archiveLogic = customArchiveMailbox
+    ? `
+        set archiveMailbox to missing value
+        repeat with mb in mailboxes of theAccount
+            if name of mb is "${customArchiveMailbox}" then
+                set archiveMailbox to mb
+                exit repeat
+            end if
+        end repeat
 
-        -- Find the Archive mailbox for this account
+        if archiveMailbox is missing value then
+            return "ERROR:Archive mailbox '${customArchiveMailbox}' not found for this account"
+        end if`
+    : `
+        -- Find the Archive mailbox for this account (try common names)
         set archiveMailbox to missing value
         repeat with mb in mailboxes of theAccount
-            if name of mb is "Archive" or name of mb is "All Mail" then
+            if name of mb is "Archive" or name of mb is "Archives" or name of mb is "All Mail" then
                 set archiveMailbox to mb
                 exit repeat
             end if
         end repeat
 
         if archiveMailbox is missing value then
-            return "ERROR:No Archive mailbox found for this account"
-        end if
+            return "ERROR:No Archive mailbox found for this account. Try specifying archiveMailbox parameter with the exact folder name."
+        end if`;
+
+  const script = `
+tell application "Mail"
+    try
+        set theMailbox to ${accountPart}
+        set theMessage to (first message of theMailbox whose id is ${messageId})
+        set theAccount to account of theMailbox
+        ${archiveLogic}
 
         move theMessage to archiveMailbox
         return "Message archived successfully"

package/src/index.ts

@@ -163,6 +163,7 @@ server.setRequestHandler(CallToolRequestSchema, async (request) => {
           messageId,
           account: args?.account as string | undefined,
           mailbox: (args?.mailbox as string) || "INBOX",
+          archiveMailbox: args?.archiveMailbox as string | undefined,
         });
 
         return {

package/src/tools.ts

@@ -165,6 +165,10 @@ export const MAIL_ARCHIVE: Tool = {
         description: "The name of the mailbox/folder where the email currently is (default: INBOX)",
         default: "INBOX",
       },
+      archiveMailbox: {
+        type: "string",
+        description: "The name of the archive mailbox to move the email to (default: auto-detects 'Archive', 'Archives', or 'All Mail')",
+      },
     },
     required: ["messageId"],
   },