d2c2dc5e9700a2ddb396950efc5172a041a5f98f
commit d2c2dc5e9700a2ddb396950efc5172a041a5f98f
Author: Simon Watson <spw01@protonmail.com>
Date: Mon Feb 14 20:42:42 2022 -0500

Small mac changes and clipboard for region pb

diff --git a/emacs/.emacs-all b/emacs/.emacs-all
index 807f626..7a77a17 100644
--- a/emacs/.emacs-all
+++ b/emacs/.emacs-all
@@ -319,7 +319,7 @@
;; Graphic Display
(if (display-graphic-p)
(progn
- (load-theme 'solarized-dark t)))))
+ (load-theme 'solarized-light t)))))

;; Load for GUI Linux
(if (eq system-type 'gnu/linux)
diff --git a/emacs/elisp/helpers.el b/emacs/elisp/helpers.el
index 523a655..5e13e00 100644
--- a/emacs/elisp/helpers.el
+++ b/emacs/elisp/helpers.el
@@ -35,7 +35,12 @@
"curl -s -F \"file=@-\" -H \"expire:60min\" http://chate.io:669"
standard-output))
0 -1))
- (message *last-pb-url*))
+ (message *last-pb-url*)
+ ;; There may be a more direct way to
+ ;; do this?
+ (with-temp-buffer
+ (insert *last-pb-url*)
+ (clipboard-kill-region (point-min) (point-max))))

(defun display-pb (&optional url-arg)
"Display either last pb url content, or passed URL.
diff --git a/emacs/mac-load/customs.el b/emacs/mac-load/customs.el
index d55bcf3..9fab5b3 100644
--- a/emacs/mac-load/customs.el
+++ b/emacs/mac-load/customs.el
@@ -13,4 +13,8 @@
;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right.
- '(default ((t (:family "Envy Code R" :foundry "nil" :slant normal :weight normal :height 141 :width normal)))))
+ '(default ((t (:family "Envy Code R" :foundry "nil" :slant normal :weight normal :height 141 :width normal))))
+ '(org-level-1 ((t (:inherit variable-pitch :foreground "#cb4b16" :height 1.0))))
+ '(org-level-2 ((t (:inherit variable-pitch :foreground "#859900" :height 1.0))))
+ '(org-level-3 ((t (:inherit variable-pitch :foreground "#268bd2" :height 1.0))))
+ '(org-level-4 ((t (:inherit variable-pitch :foreground "#b58900" :height 1.0)))))