diff options
| author | jao <jao@gnu.org> | 2025-09-19 22:20:32 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2025-09-19 22:22:28 +0100 |
| commit | 6a7509aa7b75c0f836a48053b6d7ed1ba1320724 (patch) | |
| tree | 4e08c865e897c34654d5853029ae1789548c53f0 /lib/net/jao-eww-session.el | |
| parent | 2bf3b030097f57e370b7e5b4f908e0d5b45500da (diff) | |
| download | elibs-6a7509aa7b75c0f836a48053b6d7ed1ba1320724.tar.gz elibs-6a7509aa7b75c0f836a48053b6d7ed1ba1320724.tar.bz2 | |
jao-ewww-session: bootstrap bug
Diffstat (limited to 'lib/net/jao-eww-session.el')
| -rw-r--r-- | lib/net/jao-eww-session.el | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/lib/net/jao-eww-session.el b/lib/net/jao-eww-session.el index 4ac5447..da5bc8b 100644 --- a/lib/net/jao-eww-session.el +++ b/lib/net/jao-eww-session.el @@ -1,6 +1,6 @@ ;;; jao-eww-session.el --- Persistent eww sessions -*- lexical-binding: t; -*- -;; Copyright (C) 2003, 2004, 2006, 2007, 2008, 2009, 2012, 2021, 2022 Jose A Ortega Ruiz +;; Copyright (C) 2003-2004, 2006-2009, 2012, 2021-2022, 2025 Jose A Ortega Ruiz ;; Author: Jose A Ortega Ruiz <jao@gnu.org> ;; Version: 0.4 @@ -168,15 +168,14 @@ the session is already displayed in a eww tab, jao-eww-session can: (defun jao-eww-session--to--file (filename &optional skip) (require 'pp) - (when (jao-eww-session-not-empty) - (let ((inhibit-message t) - (session (jao-eww-session--update-current skip))) - (with-temp-buffer - (insert ";;;; File generated by jao-eww-session. DO NOT EDIT!\n") - (pp session (current-buffer)) - (insert "\n" ";;;; End of " - (file-name-nondirectory jao-eww-session-file) "\n") - (write-region (point-min) (point-max) (expand-file-name filename)))))) + (let ((inhibit-message t) + (session (jao-eww-session--update-current skip))) + (with-temp-buffer + (insert ";;;; File generated by jao-eww-session. DO NOT EDIT!\n") + (pp session (current-buffer)) + (insert "\n" ";;;; End of " + (file-name-nondirectory jao-eww-session-file) "\n") + (write-region (point-min) (point-max) (expand-file-name filename))))) (defun jao-eww-session--backup-name (fname) (concat (expand-file-name fname) ".bak")) |