From a82ff62dae3ad45b52f170c513d8c9913bb9a8d4 Mon Sep 17 00:00:00 2001 From: Yuchen Pei Date: Tue, 28 Nov 2023 16:49:51 +1100 Subject: [emacs] minor changes - google slides to odp url rewrite - fixing emacs-29 lag by setting long-line-threshold to nil --- emacs/.emacs.d/init/ycp-editing.el | 5 +++-- emacs/.emacs.d/init/ycp-web.el | 7 +++++++ 2 files changed, 10 insertions(+), 2 deletions(-) (limited to 'emacs') diff --git a/emacs/.emacs.d/init/ycp-editing.el b/emacs/.emacs.d/init/ycp-editing.el index a26cee0..8d260ee 100644 --- a/emacs/.emacs.d/init/ycp-editing.el +++ b/emacs/.emacs.d/init/ycp-editing.el @@ -170,8 +170,9 @@ 'auto-mode-alist '("\\(README\\|CHANGELOG\\|COPYING\\|LICENSE\\)\\'" . text-mode)) ;; https://lists.gnu.org/archive/html/emacs-devel/2023-06/msg00113.html -(when (string< emacs-version "29") - (add-hook 'before-save-hook 'time-stamp)) +;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2023-11/msg01149.html +(unless (string< emacs-version "29") + (setq long-line-threshold nil)) (save-place-mode 1) diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el index 3109e2c..6f74966 100644 --- a/emacs/.emacs.d/init/ycp-web.el +++ b/emacs/.emacs.d/init/ycp-web.el @@ -137,6 +137,13 @@ :actions ((replace-path-regexp "\\(/document/d/.*?\\)/.*" "\\1/export") (put-query "format" "odt"))) + (:name google-slides-odp + :description "Download Google slides as odp." + :match (concat url-rw-www-re + (rx "docs.google.com/presentation/d/")) + :actions ((replace-path-regexp "\\(/document/d/.*?\\)/.*" + "\\1/export") + (put-query "format" "odp"))) (:name google-to-ddg :description "Google search to duckduckgo html." :match (concat url-rw-www-re (rx "google.com/search?q=")) -- cgit v1.2.3