I have a very nice emacs/org-mode, BBDB setup on my N900 but I have one more thing I need to make it complete.
By the way: THANK YOU! to all for all the help so far!
I found this code and it works on my other computers (Crunchbang Linux and ArchLinux) and I would like to have it work on the N900.
What I really need to know is: What is the maemo version of notify-send?
This code notices my appointments and creates a pop-up and plays a sound file to alert me of upcoming meetings.
*** begin of elisp code
(defun djcb-popup (title msg &optional icon sound)
"Show a popup if we're on X, or echo it otherwise; TITLE is the title
of the message, MSG is the context. Optionally, you can provide an ICON and
a sound to be played"
(if icon (concat "-i " icon) "")
" '" title "' '" msg "'"))
;; text only version
(message (concat title ": " msg))))
;; the appointment notification facility
(setq
appt-message-warning-time 15 ;; warn 15 min in advance
appt-display-mode-line t ;; show in the modeline
appt-display-format 'window) ;; use our func
(appt-activate 1) ;; active appt (appointment notification)
(display-time) ;; time display is required for this...
By the way: THANK YOU! to all for all the help so far!
I found this code and it works on my other computers (Crunchbang Linux and ArchLinux) and I would like to have it work on the N900.
What I really need to know is: What is the maemo version of notify-send?
This code notices my appointments and creates a pop-up and plays a sound file to alert me of upcoming meetings.
*** begin of elisp code
(defun djcb-popup (title msg &optional icon sound)
"Show a popup if we're on X, or echo it otherwise; TITLE is the title
of the message, MSG is the context. Optionally, you can provide an ICON and
a sound to be played"
(interactive)
(when sound (shell-command
(concat "aplay " sound " 2> /dev/null")))
(if (eq window-system 'x)
(shell-command (concat "notify-send "
(if icon (concat "-i " icon) "")
" '" title "' '" msg "'"))
;; text only version
(message (concat title ": " msg))))
;; the appointment notification facility
(setq
appt-message-warning-time 15 ;; warn 15 min in advance
appt-display-mode-line t ;; show in the modeline
appt-display-format 'window) ;; use our func
(appt-activate 1) ;; active appt (appointment notification)
(display-time) ;; time display is required for this...
;; update appt each time agenda opened
(add-hook 'org-finalize-agenda-hook 'org-agenda-to-appt)
;; our little façade-function for djcb-popup
(defun djcb-appt-display (min-to-app new-time msg)
(djcb-popup (format "Appointment in %s minute(s)" min-to-app) msg
"/usr/share/icons/gnome/32x32/status/appointment-soon.png"
"/usr/share/sounds/purple/alert.wav"))
(setq appt-disp-window-function (function djcb-appt-display))
*** end of elisp code
It would be really cool if it would be the same popup as I see when I get a new email message.
So I would have to change the icon library and sound library but what do I use for notify-send?
Thanks!
David