Added hook to auto-save archive files

emacs/.emacs.d/README.org

@@ -882,10 +882,8 @@ Setup some basic quality of life org settings.
         org-ellipsis wolfe/org-ellipsis)
 
   (defun wolfe/org-tags-compute-width ()
-    (- (floor (* 0.75 (frame-width))))
-    (org-align-all-tags))
+    (- (floor (* 0.8 (frame-width)))))
 
-  ;; 0.75 is used since that's approximately how much bigger the org heading is
   (add-hook 'org-mode-hook
             '(lambda ()
                (setq org-tags-column (wolfe/org-tags-compute-width))
@@ -895,6 +893,13 @@ Setup some basic quality of life org settings.
                (setq org-agenda-tags-column (wolfe/org-tags-compute-width))
                (org-agenda-align-tags)))
 
+  (defun wolfe/save-org-archive-buffers (orig-fun &rest args)
+    (save-some-buffers 'no-confirm
+                       '(lambda ()
+                         (string-match "_archive\\'" buffer-file-name))))
+
+  (advice-add 'org-archive-subtree :after 'wolfe/save-org-archive-buffers)
+
   (org-babel-do-load-languages
    'org-babel-load-languages
    '((shell . t)