2016-01-29 07:05:00 -05:00
|
|
|
;;; module-demo.el --- for collaboration and demonstrations
|
|
|
|
|
|
|
|
|
|
;; This library offers:
|
|
|
|
|
;; + impatient-mode: for broadcasting my emacs session
|
2016-02-04 18:52:50 -05:00
|
|
|
;; + big-mode: for enlarged text while screencasting
|
|
|
|
|
;; + integration with reveal.js for presentations
|
|
|
|
|
|
|
|
|
|
;; Big-mode settings
|
2016-02-22 12:35:34 -05:00
|
|
|
(defconst big-mode-font (font-spec :family "Hack" :size 16))
|
|
|
|
|
(defconst big-mode-line-spacing 0)
|
|
|
|
|
|
|
|
|
|
(defvar big-mode--line-spacing line-spacing)
|
2016-02-04 18:52:50 -05:00
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
2016-01-29 07:05:00 -05:00
|
|
|
|
|
|
|
|
(use-package impatient-mode
|
|
|
|
|
:defer t
|
|
|
|
|
:commands httpd-start)
|
|
|
|
|
|
2016-02-13 01:12:35 -05:00
|
|
|
(add-hook! org-load
|
|
|
|
|
(use-package ox-reveal
|
|
|
|
|
:config
|
|
|
|
|
(setq org-reveal-root "https://cdnjs.cloudflare.com/ajax/libs/reveal.js/3.2.0/js/reveal.min.js")))
|
|
|
|
|
|
2016-01-29 07:05:00 -05:00
|
|
|
;;;
|
|
|
|
|
|
|
|
|
|
(defvar big-mode-font narf-default-font)
|
|
|
|
|
|
|
|
|
|
(define-minor-mode big-mode
|
|
|
|
|
:init-value nil
|
|
|
|
|
:lighter " BIG"
|
|
|
|
|
:global t
|
2016-02-22 12:35:34 -05:00
|
|
|
(narf/load-font (if big-mode big-mode-font narf-default-font))
|
|
|
|
|
(setq-default line-spacing (if big-mode big-mode-line-spacing big-mode--line-spacing)))
|
2016-01-29 07:05:00 -05:00
|
|
|
|
|
|
|
|
(provide 'module-demo)
|
|
|
|
|
;;; module-demo.el ends here
|
