Xah Talk Show 2026-03-13 Ep779. AI and female warrior. Professor Jiang (predictive history)
Video Summary (Generated by AI, Edited by Human.)
This video is a casual talk show where the creator, Xah Lee, works on coding tasks while chatting with viewers. The main topics include Emacs Lisp programming, Wolfram Language coding, and discussions on modern society and politics.
Video Highlights:
- Coding Session (0:47-34:40): Xah demo and mod his Emacs Lisp commands, specifically focusing on an html-open-in-browser function and a custom HTML mode for formatting pre-tags and encoding characters.
- Modern Society Commentary (1:58-7:48): The creator discusses female warrior fantasy, and commentary on how modern society has forgotten basic survival skills such as the act of taking life out of pig pows chickens, yet relies heavily on technology.
- YouTube Channel Discussion (35:36-51:38): discuss the sudden political commentator star Professor Jiang. His channel Predictive History, game theory, history of Western religion, geopolitics, and current American politics.
- emacs lisp coding (52:00-1:25:20): Xah demo emacs tools for managing screenshots, specifically converting PNG to JPEG and optimizing file names using hexadecimal formatting to maintain chronological order.
- Philosophy and Politics (1:37:50-1:47:00): The video concludes with thoughts on the manosphere, political commentators like Brett and Eric Weinstein, and observations on the Christian American fascination with apocalyptic scenarios and their need to view things as 4d chess.
AI video. cat girls sword fight
emacs lisp. xah-html-rehtmlize-precode-buffer
- emacs lisp, add a hook to xah html mode, so when
xah-html-open-in-browser, auto doxah-html-rehtmlize-precode-buffer
xah-html-rehtmlize-precode-buffer
is renamed to
xah-html-redo-syntax-color-pre-tags
on 2026-03-13
Professor Jiang (predictive history)
- emacs lisp, mod
xah-html-move-image-file, so it adds random letters in filename not just hexadecimal.
d88c 8db4 c6d2 34ea e56b MTp7W QSQxK dmN3z
;; comparison of coding style ;; this style, is easy to understand, but is mutating a variable, not good functional programing style (setq xnewName (let (xx) (setq xx (file-name-nondirectory (file-name-sans-extension xfromPath))) (setq xx (replace-regexp-in-string "\\`tt[0-9]*" "" xx t)) (setq xx (replace-regexp-in-string "screenshot\\|Screen Shot" "sshot" xx t)) (setq xx (replace-regexp-in-string "[, +|@()]" "_" xx t)) (setq xx (replace-regexp-in-string "\\([0-9][0-9][0-9][0-9]-[0-9][0-9]-[0-9][0-9]\\)_\\([0-9]\\{6\\}\\)" (lambda (x) (concat (match-string 1 x) "_" (format "%05x" (string-to-number (match-string 2 x))))) xx t)))) ;; s------------------------------ ;; this style, is good functional programing style, but hard to read and hard to modify (setq xnewName (replace-regexp-in-string "\\([0-9][0-9][0-9][0-9]-[0-9][0-9]-[0-9][0-9]\\)_\\([0-9]\\{6\\}\\)" (lambda (x) (concat (match-string 1 x) "_" (format "%05x" (string-to-number (match-string 2 x))))) (replace-regexp-in-string "[, +|@()]" "_" (replace-regexp-in-string "screenshot\\|Screen Shot" "sshot" (replace-regexp-in-string "\\`tt[0-9]*" "" (file-name-nondirectory (file-name-sans-extension xfromPath)) t) t) t) t))