Added transparency commands, got rid of extra org link copy function

Emacs/core-settings.el

@@ -177,11 +177,6 @@
 	(interactive)
 	(simpleclip-set-contents buffer-file-name)
 	)
-
-  (defun macoy-org-copy-file-line-link-to-clipboard ()
-	(interactive)
-	(simpleclip-set-contents (format "[[file:%s::%d][" buffer-file-name (line-number-at-pos)))
-	)
   )
 
 ;; Open file in explorer

Emacs/org-customizations.el

@@ -1,9 +1,14 @@
 
 (when (require 'simpleclip)
-  (defun macoy-create-copy-org-link-from-point (link-text)
-	"Create a link from the file and line at point and copy it to the clipboard"
-	(interactive "sLink text: ")
-	(simpleclip-set-contents (format "[[%s::%d][%s]]" buffer-file-name (line-number-at-pos) link-text))
+  ;; (defun macoy-org-create-copy-link-from-point (link-text)
+  ;; 	"Create a link from the file and line at point and copy it to the clipboard"
+  ;; 	(interactive "sLink text: ")
+  ;; 	(simpleclip-set-contents (format "[[%s::%d][%s]]" buffer-file-name (line-number-at-pos) link-text))
+  ;; 	)
+
+  (defun macoy-org-copy-file-line-link-to-clipboard ()
+	(interactive)
+	(simpleclip-set-contents (format "[[file:%s::%d][" buffer-file-name (line-number-at-pos)))
 	)
   )
 

Emacs/visual-late.el

@@ -8,7 +8,20 @@
 ;; Whole-window transparency
 ;; The first number is transparency while active
 ;; The second number is transparency while inactive
-(set-frame-parameter (selected-frame) 'alpha '(82 70))
+(defun macoy-high-transparency ()
+  (interactive)
+  (set-frame-parameter (selected-frame) 'alpha '(80 70)))
+(defun macoy-normal-transparency ()
+  (interactive)
+  (set-frame-parameter (selected-frame) 'alpha '(85 70)))
+(defun macoy-low-transparency ()
+  (interactive)
+  (set-frame-parameter (selected-frame) 'alpha '(95 85)))
+(defun macoy-no-transparency ()
+  (interactive)
+  (set-frame-parameter (selected-frame) 'alpha '(100 100)))
+
+(macoy-normal-transparency)
 
 ;; Add a slight border to give us some breathing room on the edges
 (set-frame-parameter (selected-frame) 'internal-border-width 5)