howard/hamacs
howard/hamacs
1
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Demo code can load file or switch to buffer

Browse source
This commit is contained in:
Howard Abrams 2024-10-29 19:42:34 -07:00
parent f735e4c59e
commit 5182b352cd
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
ha-demos.org
View file

@ -2,7 +2,7 @@
#+author: Howard X. Abrams #+author: Howard X. Abrams
#+date: 2024-10-18 #+date: 2024-10-18
#+filetags: emacs hamacs #+filetags: emacs hamacs
#+lastmod: [2024-10-24 Thu] #+lastmod: [2024-10-26 Sat]
A literate programming file for creating and running demonstrations A literate programming file for creating and running demonstrations
@ -275,8 +275,11 @@ All options? Should I use Common Lisp’s =cl-defun= for the keyword parameters?
('below (progn (split-window-vertically) (other-window 1)))) ('below (progn (split-window-vertically) (other-window 1))))
;; We could do :left and :top by not doing the other window bit... ;; We could do :left and :top by not doing the other window bit...
;; Step 2: Load the file ;; Step 2: Load the file or switch to the buffer:
(if (file-exists-p filename)
(find-file filename) (find-file filename)
(switch-to-buffer filename))
(goto-char (point-min)) (goto-char (point-min))
;; Step 3: Increase the font size ;; Step 3: Increase the font size