diff --git a/oni-termux.el b/oni-termux.el index a6d1940..ca95a80 100644 --- a/oni-termux.el +++ b/oni-termux.el @@ -4,7 +4,7 @@ ;; Author: Tom Willemse ;; Keywords: local -;; Version: 2019.0920.193557 +;; Version: 2019.1006.113112 ;; Package-Requires: (oni-alert alert-termux) ;; This program is free software; you can redistribute it and/or modify @@ -31,8 +31,7 @@ ;;; Code: (require 'alert) -(require 'alert-termux) -(require 'battery) +;;(require 'alert-termux) (require 'json) (defun oni-termux--battery-status () @@ -55,12 +54,27 @@ The following %-sequences are provided: (cons ?B (alist-get 'status info "N/A")) (cons ?t (number-to-string (alist-get 'temperature info -1)))))) -(setq battery-status-function #'oni-termux--battery-status) +(defun oni-termux--load-alert-termux () + "Load ‘alert-termux’. +This can’t be done by a require because it appears that +‘alert-termux’ gets added to the load path and loaded after this +library, so use this function in ‘after-init-hook’ instead." + (load-library "alert-termux")) + +;; To keep the byte-compiler happy I use a `defvar' here. +(defvar battery-status-function #'oni-termux--battery-status) + +;; The battery library needs to be loaded after the battery variables +;; have been set, otherwise loading it will produce the error that +;; access is denied to /sys/class/power_supply. +(require 'battery) (setq battery-mode-line-format "%p%%") (setq alert-default-style 'termux) +(add-hook 'after-init-hook #'oni-termux--load-alert-termux) + (display-battery-mode) ;;;###autoload(require 'oni-termux)