some mac improvements, etc

init.el

@@ -25,6 +25,12 @@
 ;; set up use-package
 (straight-use-package 'use-package)
 
+;; maybe improve backups
+(make-directory "~/.emacs_backups/" t)
+(make-directory "~/.emacs_autosave/" t)
+;(setq auto-save-file-name-transforms '((".*" "~/.emacs_autosave/" t)))
+;(setq backup-directory-alist '(("." . "~/.emacs_backups/")))
+
 ;; set a bunch of varibles
 (setq user-full-name "d_m"
       user-mail-address "d_m@plastic-idolatry.com"
@@ -37,6 +43,7 @@
       line-move-visual nil
       create-lockfiles nil
       make-backup-files nil
+      backup-by-copying t
       column-number-mode t
       scroll-error-top-bottom t
       show-paren-delay 0.5
@@ -72,9 +79,9 @@
 
 ;; prioritized list of fonts to try
 (defvar my/fonts
-  '("PragmataPro Mono Liga"
+  '("PragmataPro Liga"
     "PragmataPro Mono"
-    "PragmataPro Liga"
+    "PragmataPro Mono Liga"
     "PragmataPro"
     "Iosevka"
     "JetBrains Mono"
@@ -534,6 +541,8 @@
         scroll-up-aggressively 0.0
         scroll-down-aggressively 0.0
         emms-playlist-buffer-name "*Music*")
+  (when (memq window-system '(mac ns x))
+    (setq emms-source-file-directory-tree-function 'emms-source-file-directory-tree-internal))
   (emms-all)
   (emms-default-players))