summaryrefslogtreecommitdiffstats
path: root/2023/talks
diff options
context:
space:
mode:
Diffstat (limited to '2023/talks')
-rw-r--r--2023/talks/flat.md38
-rw-r--r--2023/talks/mentor.md2
2 files changed, 27 insertions, 13 deletions
diff --git a/2023/talks/flat.md b/2023/talks/flat.md
index bf579540..4cf53d5b 100644
--- a/2023/talks/flat.md
+++ b/2023/talks/flat.md
@@ -42,18 +42,32 @@ activities.
in Emacs core?
- A: About a 20-line patch.
- Q: Could you please share the code for copy and paste? Thx!
- - A: 
- - (defun flat-style(theme &rest args)
- -   (custom-set-faces
- -    `(mode-line
- -      ((t (:inherit mode-line
- -                    :box (:line-width ,mode-line-height :style
- flat-button)))) t)
- -    `(mode-line-inactive
- -      ((t (:inherit mode-line-inactive
- -                    :box (:line-width ,mode-line-height :style
- flat-button)))) t)))
- - (advice-add 'load-theme :after #'flat-style)
+ - A:
+
+ (defun flat-style (theme &rest args)
+ (custom-set-faces
+ `(mode-line
+ ((t (:inherit mode-line
+ :box (:line-width ,mode-line-height :style
+ flat-button)))) t)
+ `(mode-line-inactive
+ ((t (:inherit mode-line-inactive
+ :box (:line-width ,mode-line-height :style
+ flat-button)))) t)))
+ (advice-add 'load-theme :after #'flat-style)
+
+ - **Important change 2 years later.**
+ CHANGES IN EMACS MASTER make the code above CRASH. Emacs,
+ The new flat-style function uses set-face-attribute:
+
+ (defvar mode-line-height 8 "Size of the box arounf the mode line")
+ (defun flat-style (theme &rest _)
+ (set-face-attribute 'mode-line nil
+ :box (list :line-width mode-line-height :style 'flat-button))
+ (set-face-attribute 'mode-line-inactive nil
+ :box (list :line-width mode-line-height :style 'flat-button)))
+
+
- Q: Do you teach Emacs to any of your university students?
- A: No teaching, but a lot of introdcuing ;-)
diff --git a/2023/talks/mentor.md b/2023/talks/mentor.md
index 21b53045..70071e0e 100644
--- a/2023/talks/mentor.md
+++ b/2023/talks/mentor.md
@@ -7,7 +7,7 @@
# Mentoring VS-Coders as an Emacsian (or How to show not tell people about the wonders of Emacs)
-Jeremy Friesen (he/him) - Pronunciation: JERR-im-EE FREE-SEHN, https://takeonrules.com, <mailto:jeremy@jeremyfriesen.com>
+Jeremy Friesen (he/him) - Pronunciation: JERR-im-EE FREE-SEHN, <https://takeonrules.com>, <mailto:jeremy@jeremyfriesen.com>
[[!inline pages="internal(2023/info/mentor-before)" raw="yes"]]