frork: mailmate
change urmsnwsxqpsnypnoulozwzslmttpwmpq
commit a8b1aa3424d020983aa382f4a9d2eaf82b9099c5
author Alpha Chen <alpha@kejadlen.dev>
date
parent ymurzvqu
diff --git a/frork/_defaults.fnl b/frork/_defaults.fnl
index 7f6a53ad..00f5e9c1 100644
--- a/frork/_defaults.fnl
+++ b/frork/_defaults.fnl
@@ -1,5 +1,7 @@
 (local {: ok} (require :frork))
 
+(require :types)
+
 ;; # TODO restart Dock, Finder, and SystemUIServer on changes
 
 (local domain-defaults
diff --git a/frork/_dotfiles.fnl b/frork/_dotfiles.fnl
index a43f0bcd..2a0ca0a5 100644
--- a/frork/_dotfiles.fnl
+++ b/frork/_dotfiles.fnl
@@ -12,6 +12,7 @@
                 :.p10k.zsh
                 :.profile
                 :.ruby-version
+                :.ssh
                 :.zsh
                 :.zshenv
                 :.zshrc
diff --git a/frork/_macos.fnl b/frork/_macos.fnl
index 0d9de5a7..593413b9 100644
--- a/frork/_macos.fnl
+++ b/frork/_macos.fnl
@@ -10,9 +10,13 @@
   (ok :directory "~/Library/KeyBindings")
   (ok :symlink dest src))
 
-(let [mailmate-keybindings "~/Library/Application Support/MailMate/Resources/KeyBindings/Alpha.plist"]
-  (ok :directory (dirname mailmate-keybindings))
-  (ok :symlink mailmate-keybindings "~/.dotfiles/macos/MailMate.plist"))
+(let [mailmate "~/Library/Application Support/MailMate/"
+      resources (.. mailmate :Resources/)]
+  (ok :directory (dirname resources))
+  (ok :symlink (.. resources :KeyBindings/Alpha.plist)
+      "~/.dotfiles/macos/MailMate/KeyBindings.plist")
+  (ok :symlink (.. mailmate :Tags.plist)
+      "~/.dotfiles/macos/MailMate/Tags.plist"))
 
 ;; this is slow - maybe replace with a hand-rolled assertion type?
 (ok :brew-bundle "~/.dotfiles/Brewfile")
@@ -36,4 +40,8 @@
                                  :datemodified)
                             ;; TODO if we add handlers, do this there instead
                             (sh! :killall :Dock))})
+
 (ok :dock)
+
+;; TODO
+;; - install numderline fonts
diff --git a/macos/MailMate.plist b/macos/MailMate/KeyBindings.plist
similarity index 100%
rename from macos/MailMate.plist
rename to macos/MailMate/KeyBindings.plist
diff --git a/macos/MailMate/Tags.plist b/macos/MailMate/Tags.plist
new file mode 100644
index 00000000..11599909
--- /dev/null
+++ b/macos/MailMate/Tags.plist
@@ -0,0 +1,63 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
+<plist version="1.0">
+<dict>
+	<key>tags</key>
+	<array>
+		<dict>
+			<key>displayName</key>
+			<string>good feelings</string>
+			<key>gmail</key>
+			<string>good feelings</string>
+			<key>shortDisplayName</key>
+			<string>๐Ÿ˜</string>
+		</dict>
+		<dict>
+			<key>displayName</key>
+			<string>focus &amp; reply</string>
+			<key>gmail</key>
+			<string>focus and reply</string>
+			<key>serverKeyword</key>
+			<string>focusandreply</string>
+			<key>shortDisplayName</key>
+			<string>๐ŸŽฏ</string>
+		</dict>
+		<dict>
+			<key>displayName</key>
+			<string>set aside</string>
+			<key>gmail</key>
+			<string>set aside</string>
+			<key>shortDisplayName</key>
+			<string>๐Ÿ“Œ</string>
+		</dict>
+		<dict>
+			<key>displayName</key>
+			<string>hidden</string>
+			<key>gmail</key>
+			<string>hidden</string>
+			<key>serverKeyword</key>
+			<string>hidden</string>
+			<key>shortDisplayName</key>
+			<string>๐Ÿ‘ป</string>
+		</dict>
+		<dict>
+			<key>displayName</key>
+			<string>awaiting reply</string>
+			<key>gmail</key>
+			<string>awaiting reply</string>
+			<key>shortDisplayName</key>
+			<string>๐Ÿ“</string>
+		</dict>
+		<dict>
+			<key>displayName</key>
+			<string>discount</string>
+			<key>gmail</key>
+			<string>discount</string>
+			<key>serverKeyword</key>
+			<string>discount</string>
+			<key>shortDisplayName</key>
+			<string>๐Ÿ’ต</string>
+		</dict>
+	</array>
+</dict>
+</plist>