Add things for macos

init.el

@@ -36,6 +36,11 @@
   (string-equal system-type "windows-nt")
   )
 
+(defun ismac ()
+  "Return true if on macos"
+  (string-equal system-type "darwin")
+  )
+
 (setq completion-ignore-case t)
 (setq read-file-name-completion-ignore-case t)
 (setq read-buffer-completion-ignore-case t)
@@ -313,6 +318,9 @@
   ;; shows nice icons in modeline + neotree
   :config
   (when (islin)
+  (when (not (member "all-the-icons" (font-family-list)))
+    (all-the-icons-install-fonts t)))
+  (when (ismac)
   (when (not (member "all-the-icons" (font-family-list)))
     (all-the-icons-install-fonts t)))) ; need to install fonts manually on windows
 
@@ -359,6 +367,12 @@
 
 "))
 
+(when (ismac)
+(setq initial-scratch-message "\
+# ｏｔｔａ  ｎｅｉ  ｇｅｎ  ｅｍａｃｓ
+
+"))
+
 (when (iswin)
 (setq initial-scratch-message "\
 # obma emacs war microsoft beistry