diff options
| author | jao <jao@gnu.org> | 2025-10-01 17:23:20 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-10-01 17:23:50 +0100 |
| commit | 3e96ae1ade23eee42b63ed047682b7cbf430f7d8 (patch) | |
| tree | 886508504f2d17f9f717557b1e23fce5135dae3b /lib/doc/jao-mac.el | |
| parent | 1a54f3532dcd812b5b4c1c1ecfcf366d9aa10669 (diff) | |
| download | elibs-3e96ae1ade23eee42b63ed047682b7cbf430f7d8.tar.gz elibs-3e96ae1ade23eee42b63ed047682b7cbf430f7d8.tar.bz2 | |
jao-mpc tweaks (mainly notifications)
Diffstat (limited to 'lib/doc/jao-mac.el')
| -rw-r--r-- | lib/doc/jao-mac.el | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lib/doc/jao-mac.el b/lib/doc/jao-mac.el index b9da4ab..06d6ad3 100644 --- a/lib/doc/jao-mac.el +++ b/lib/doc/jao-mac.el @@ -20,7 +20,7 @@ (require 'jao-shell) -;;; Applescript +;;; applescript (defun jao-mac-applescript-prepare (&rest lines) (let ((script (mapconcat 'identity lines "\r")) (start)) @@ -74,6 +74,13 @@ (format "keystroke %s" (or page 1)) "delay 0.1\rkeystroke return\rend tell"))) +;;; notifications + +(defun jao-mac-notify (title subtitle msg) + (jao-mac-run-applescript* + (format "display notification %S with title %S subtitle %S" + msg title subtitle))) + ;;; Skim (defvar jao-skim--current-file-script (jao-mac-applescript-prepare |