X-Loop: help-debbugs@HIDDEN
Subject: bug#62239: 30.0.50; emacs 30.5.0 editing epub encoding system
Resent-From: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-gnu-emacs@HIDDEN
Resent-Date: Fri, 17 Mar 2023 10:14:02 +0000
Resent-Message-ID: <handler.62239.B.16790480128029 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: report 62239
X-GNU-PR-Package: emacs
X-GNU-PR-Keywords:
To: 62239 <at> debbugs.gnu.org
X-Debbugs-Original-To: bug-gnu-emacs@HIDDEN
Received: via spool by submit <at> debbugs.gnu.org id=B.16790480128029
(code B ref -1); Fri, 17 Mar 2023 10:14:02 +0000
Received: (at submit) by debbugs.gnu.org; 17 Mar 2023 10:13:32 +0000
Received: from localhost ([127.0.0.1]:43734 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1pd75V-00025O-U2
for submit <at> debbugs.gnu.org; Fri, 17 Mar 2023 06:13:32 -0400
Received: from lists.gnu.org ([209.51.188.17]:51252)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <Heiner.Heitlaender@HIDDEN>) id 1pd5ys-0000IK-Fh
for submit <at> debbugs.gnu.org; Fri, 17 Mar 2023 05:02:36 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10])
by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from <Heiner.Heitlaender@HIDDEN>)
id 1pd5ys-0004P4-96
for bug-gnu-emacs@HIDDEN; Fri, 17 Mar 2023 05:02:34 -0400
Received: from mout01.posteo.de ([185.67.36.65])
by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256)
(Exim 4.90_1) (envelope-from <Heiner.Heitlaender@HIDDEN>)
id 1pd5yn-0003wZ-In
for bug-gnu-emacs@HIDDEN; Fri, 17 Mar 2023 05:02:34 -0400
Received: from submission (posteo.de [185.67.36.169])
by mout01.posteo.de (Postfix) with ESMTPS id 22D5C240370
for <bug-gnu-emacs@HIDDEN>; Fri, 17 Mar 2023 10:02:18 +0100 (CET)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=posteo.de; s=2017;
t=1679043738; bh=k2LlI0Nt5f1SFTaxBk7J1skfbggTAousaSH/06Cmr5k=;
h=Date:To:Subject:From:From;
b=kh7N4RnAdnT/Fa93f2twVO8VJWAyZ9mmkPKNXyD33Fo2XJEJy3veUv1En0m+fbP1w
Vo66wEK0TGICzd/Ffw3h3HCn9KCodxdLWmTC6zeWWcTnrueR595Qv5BPWK69NeiXqt
CYH2iVngxC2pfYo/LgbFpaVArRI4g7vTlnKzUKs7Zmq1xKA7JWHXQbl4+GMtNXsNz0
Nlz1D9cgt/QDOPcQjjpthsMyEham06+WwC+JHmpWfdGh9VVJNTzDI3j3iCE5h8WIcL
cnsii3RrX7M/heR6F9a0K6eXaMUi1H7XxwEYsgE3faDtXMqZzaGok7t1J8OetVQGvE
dC+R0vqeapWZw==
Received: from customer (localhost [127.0.0.1])
by submission (posteo.de) with ESMTPSA id 4PdJ6d2QyCz6tnw
for <bug-gnu-emacs@HIDDEN>; Fri, 17 Mar 2023 10:02:17 +0100 (CET)
Content-Type: multipart/alternative;
boundary="------------lsyl3QpuvMpQCIPCVWLkFgCy"
Message-ID: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN>
Date: Fri, 17 Mar 2023 09:02:16 +0000
MIME-Version: 1.0
Content-Language: de-DE
From: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN>
Received-SPF: pass client-ip=185.67.36.65;
envelope-from=Heiner.Heitlaender@HIDDEN; helo=mout01.posteo.de
X-Spam_score_int: -43
X-Spam_score: -4.4
X-Spam_bar: ----
X-Spam_report: (-4.4 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1,
DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1,
HTML_FONT_FACE_BAD=0.001, HTML_MESSAGE=0.001, RCVD_IN_DNSWL_MED=-2.3,
RCVD_IN_MSPIKE_H2=-0.001, SPF_HELO_NONE=0.001,
SPF_PASS=-0.001 autolearn=ham autolearn_force=no
X-Spam_action: no action
X-Spam-Score: -1.3 (-)
X-Mailman-Approved-At: Fri, 17 Mar 2023 06:13:28 -0400
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -2.3 (--)
This is a multi-part message in MIME format.
--------------lsyl3QpuvMpQCIPCVWLkFgCy
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 8bit
Hi there
emacs seems to be losing the encoding system when editing and saving an
epub file.
If needed I can provide a test epub file (ca. 250KB)
TIA
Heiner
test case 1)
Start <emacs -Q>
1) enter epub <C-x D> .../test.epub <ENTER>
2) switch to edit In DocView(?) <C-c C-c>
3) open file ...4.html <Enter>
4) change a line (for instance " " => " ")
5) save file <C-x C-f>
6) Symptom: minibuffer display "Wrong Type Argument: stringp, nil"
7) message Buffer
<snip>
Type C-c C-c to toggle between editing or viewing the document.
Parsing archive file...done.
Type C-c C-c to toggle between editing or viewing the document.
Saving file /home/uuu/CaLib/Author/test (6551)/test -
author.epub:OEBPS/_public_vhost_g_gutenberg_html_files_3300_3300-h_3300-h-4.htm.html...
Updating archive...done
apply: Wrong type argument: stringp, nil
</snip>
test case 2)
start emacs (with custom init.el file)
1) <M-x load-file RET arc-mode.el>
<M-x load-file RET files.el>
<M-x load-file RET docview.el>
2) zoom to test file <C-x D RET> => /test
dir entry test
<snip>
drwxr-xr-x 2 user ugrp 4096 17. Mär 08:58 .
drwxr-xr-x 3 user ugrp 4096 17. Mär 09:06 ..
-rw-r--r-- 1 user ugrp 58207 17. Mär 08:06 cover.jpg
-rw-r--r-- 1 user ugrp 1237 17. Mär 08:06 metadata.opf
-rw-r--r-- 1 user ugrp 234869 17. Mär 08:58 test - Adam Smith.epub
</snip>
3) open test - Adam Smith.epub
4) minibuffer: Type C-c C-c to toggle between editing or viewing the
document.
<C-c C-c>
5) open file <... 4.html RET>
6) change file (for instance " " => " ">
7) save file <C-x C-s>
8) backtrace in Appendix
Symptoms:
9) buffers are losing the encoding system (mode-line starts with "=:---
test..."
10 Directory buffer display in basic mode(?) (mode-line starts with
"U:%%- emac...)
<snip>
-rw-r--r-- 1 user ugrp 250080 1. Jun 2022 reset-W10-Admin-PW.odt
-rw-r--r-- 1 user ugrp 954390 17. Mär 08:03 test1.epub
-rw-r--r-- 1 user ugrp 954390 17. Mär 07:55 test.epub
</snip>
Appendix: backtrace
<snip>
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
write-region(nil nil nil)
(if (equal buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name))
(let ((revert-buffer-preserve-modes t)) (apply orig-fun args) (if (equal
buffer-file-name doc-view--buffer-file-name) nil (doc-view-make-safe-dir
doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name)))
(closure ((args t t) (orig-fun . #f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>)) revert-buffer-preserve-modes) nil (let
((revert-buffer-preserve-modes t)) (apply orig-fun args) (if (equal
buffer-file-name doc-view--buffer-file-name) nil (doc-view-make-safe-dir
doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name))))()
funcall((closure ((args t t) (orig-fun . #f(compiled-function (&rest
args) #<bytecode -0x1d1afa23a289a2b6>)) revert-buffer-preserve-modes)
nil (let ((revert-buffer-preserve-modes t)) (apply orig-fun args) (if
(equal buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name)))))
(if (and (eq 'pdf doc-view-doc-type) (executable-find "pdfinfo")) (if (=
0 (call-process "pdfinfo" nil nil nil doc-view--buffer-file-name))
(funcall --cl-revert--) (if (called-interactively-p 'interactive) (progn
(message "Can't revert right now because the file is corrupt..."))))
(funcall --cl-revert--))
(let* ((--cl-revert-- #'(lambda nil (let ((revert-buffer-preserve-modes
t)) (apply orig-fun args) (if (equal buffer-file-name
doc-view--buffer-file-name) nil (doc-view-make-safe-dir
doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name)))))) (if (and (eq 'pdf doc-view-doc-type)
(executable-find "pdfinfo")) (if (= 0 (call-process "pdfinfo" nil nil
nil doc-view--buffer-file-name)) (funcall --cl-revert--) (if
(called-interactively-p 'interactive) (progn (message "Can't revert
right now because the file is corrupt...")))) (funcall --cl-revert--)))
doc-view--revert-buffer(#f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>) t t)
apply(doc-view--revert-buffer #f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>) (t t))
#f(advice doc-view--revert-buffer :around #f(compiled-function (&rest
args) #<bytecode -0x1d1afa23a289a2b6>))(t t)
apply(#f(advice doc-view--revert-buffer :around #f(compiled-function
(&rest args) #<bytecode -0x1d1afa23a289a2b6>)) t t nil)
(let ((coding-system-for-read 'no-conversion)) (apply orig-fun t t (cdr
(cdr args))))
(let ((no (archive-get-lineno))) (setq archive-files nil) (let
((coding-system-for-read 'no-conversion)) (apply orig-fun t t (cdr (cdr
args)))) (archive-mode) (goto-char archive-file-list-start)
(archive-next-line no))
archive--mode-revert(#f(advice doc-view--revert-buffer :around
#f(compiled-function (&rest args) #<bytecode -0x1d1afa23a289a2b6>)) nil nil)
apply(archive--mode-revert #f(advice doc-view--revert-buffer :around
#f(compiled-function (&rest args) #<bytecode -0x1d1afa23a289a2b6>)) (nil
nil))
#f(advice archive--mode-revert :around #f(advice doc-view--revert-buffer
:around #f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>)))(nil nil)
funcall(#f(advice archive--mode-revert :around #f(advice
doc-view--revert-buffer :around #f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>))) nil nil)
(let ((revert-buffer-in-progress-p t) (revert-buffer-preserve-modes
preserve-modes) (state (and (boundp 'read-only-mode--state) (list
read-only-mode--state)))) (funcall (or revert-buffer-function
#'revert-buffer--default) ignore-auto noconfirm) (if state (progn (setq
buffer-read-only (car state)) (set (make-local-variable
'read-only-mode--state) (car state)))))
revert-buffer()
(if (not archive-remote) (revert-buffer) (archive-maybe-update nil))
(save-restriction (message "Updating archive...") (widen) (let ((writer
(save-current-buffer (set-buffer archive-superior-buffer) (archive-name
"write-file-member"))) (archive (save-current-buffer (set-buffer
archive-superior-buffer) (archive-maybe-copy (buffer-file-name))))) (if
(fboundp writer) (funcall writer archive archive-subfile-mode)
(archive-*-write-file-member archive archive-subfile-mode (symbol-value
writer))) (set-buffer-modified-p nil) (message "Updating
archive...done")) (set-buffer archive-superior-buffer) (if (not
archive-remote) (revert-buffer) (archive-maybe-update nil)))
(save-excursion (save-restriction (message "Updating archive...")
(widen) (let ((writer (save-current-buffer (set-buffer
archive-superior-buffer) (archive-name "write-file-member"))) (archive
(save-current-buffer (set-buffer archive-superior-buffer)
(archive-maybe-copy (buffer-file-name))))) (if (fboundp writer) (funcall
writer archive archive-subfile-mode) (archive-*-write-file-member
archive archive-subfile-mode (symbol-value writer)))
(set-buffer-modified-p nil) (message "Updating archive...done"))
(set-buffer archive-superior-buffer) (if (not archive-remote)
(revert-buffer) (archive-maybe-update nil))))
archive-write-file-member()
run-hook-with-args-until-success(archive-write-file-member)
(or (run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let ((dir
(file-name-directory (expand-file-name buffer-file-name)))) (if
(file-exists-p dir) nil (if (y-or-n-p (format-message "Directory `%s'
does not exist; create? " dir)) (make-directory dir t) (error
"Canceled"))) (setq setmodes (basic-save-buffer-1))))
(if (run-hook-with-args-until-success 'write-contents-functions) nil (or
buffer-file-name (let ((filename (expand-file-name (read-file-name "File
to save in: " nil (expand-file-name ...))))) (if (file-exists-p
filename) (if (file-directory-p filename) (error "%s is a directory"
filename) (if (y-or-n-p (format-message "File `%s' exists; overwrite? "
filename)) nil (error "Canceled")))) (set-visited-file-name filename)))
(vc-before-save) (or (run-hook-with-args-until-success
'local-write-file-hooks) (run-hook-with-args-until-success
'write-file-functions) (let ((dir (file-name-directory (expand-file-name
buffer-file-name)))) (if (file-exists-p dir) nil (if (y-or-n-p
(format-message "Directory `%s' does not exist; create? " dir))
(make-directory dir t) (error "Canceled"))) (setq setmodes
(basic-save-buffer-1)))))
(save-restriction (widen) (save-excursion (and (> (point-max)
(point-min)) (not find-file-literally) (null buffer-read-only) (/=
(char-after (1- (point-max))) 10) (not (and (eq selective-display t) (=
(char-after (1- ...)) 13))) (or (eq require-final-newline t) (eq
require-final-newline 'visit-save) (and require-final-newline (y-or-n-p
(format "Buffer %s does not end in newline. Add one? " (buffer-name)))))
(save-excursion (goto-char (point-max)) (insert 10)))) (condition-case
err (run-hooks 'before-save-hook) ((debug error) (message "Before-save
hook error: %S" err) nil)) (if (run-hook-with-args-until-success
'write-contents-functions) nil (or buffer-file-name (let ((filename
(expand-file-name (read-file-name "File to save in: " nil ...)))) (if
(file-exists-p filename) (if (file-directory-p filename) (error "%s is a
directory" filename) (if (y-or-n-p ...) nil (error "Canceled"))))
(set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let ((dir
(file-name-directory (expand-file-name buffer-file-name)))) (if
(file-exists-p dir) nil (if (y-or-n-p (format-message "Directory `%s'
does not exist; create? " dir)) (make-directory dir t) (error
"Canceled"))) (setq setmodes (basic-save-buffer-1))))) (if
buffer-file-name (progn (if save-buffer-coding-system (setq
save-buffer-coding-system last-coding-system-used) (setq
buffer-file-coding-system last-coding-system-used)) (setq
buffer-file-number (file-attribute-file-identifier (file-attributes
buffer-file-name))) (if setmodes (condition-case nil (progn (if
(condition-case err ... ...) nil (set-file-extended-attributes
buffer-file-name ...))) (error nil))) (vc-after-save)))
(delete-auto-save-file-if-necessary recent-save))
(let ((recent-save (recent-auto-save-p)) setmodes) (or (null
buffer-file-name) (verify-visited-file-modtime (current-buffer)) (not
(file-exists-p buffer-file-name)) (yes-or-no-p (format "%s has changed
since visited or saved. Save anywa..." (file-name-nondirectory
buffer-file-name))) (user-error "Save not confirmed")) (save-restriction
(widen) (save-excursion (and (> (point-max) (point-min)) (not
find-file-literally) (null buffer-read-only) (/= (char-after (1-
(point-max))) 10) (not (and (eq selective-display t) (= (char-after ...)
13))) (or (eq require-final-newline t) (eq require-final-newline
'visit-save) (and require-final-newline (y-or-n-p (format "Buffer %s
does not end in newline. Add one? " ...)))) (save-excursion (goto-char
(point-max)) (insert 10)))) (condition-case err (run-hooks
'before-save-hook) ((debug error) (message "Before-save hook error: %S"
err) nil)) (if (run-hook-with-args-until-success
'write-contents-functions) nil (or buffer-file-name (let ((filename
(expand-file-name ...))) (if (file-exists-p filename) (if
(file-directory-p filename) (error "%s is a directory" filename) (if ...
nil ...))) (set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let ((dir
(file-name-directory ...))) (if (file-exists-p dir) nil (if (y-or-n-p
...) (make-directory dir t) (error "Canceled"))) (setq setmodes
(basic-save-buffer-1))))) (if buffer-file-name (progn (if
save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier (file-attributes buffer-file-name))) (if
setmodes (condition-case nil (progn (if ... nil ...)) (error nil)))
(vc-after-save))) (delete-auto-save-file-if-necessary recent-save))
(run-hooks 'after-save-hook))
(if (or (buffer-modified-p) (and buffer-file-name (not (file-exists-p
buffer-file-name)))) (let ((recent-save (recent-auto-save-p)) setmodes)
(or (null buffer-file-name) (verify-visited-file-modtime
(current-buffer)) (not (file-exists-p buffer-file-name)) (yes-or-no-p
(format "%s has changed since visited or saved. Save anywa..."
(file-name-nondirectory buffer-file-name))) (user-error "Save not
confirmed")) (save-restriction (widen) (save-excursion (and (>
(point-max) (point-min)) (not find-file-literally) (null
buffer-read-only) (/= (char-after (1- ...)) 10) (not (and (eq
selective-display t) (= ... 13))) (or (eq require-final-newline t) (eq
require-final-newline 'visit-save) (and require-final-newline (y-or-n-p
...))) (save-excursion (goto-char (point-max)) (insert 10))))
(condition-case err (run-hooks 'before-save-hook) ((debug error)
(message "Before-save hook error: %S" err) nil)) (if
(run-hook-with-args-until-success 'write-contents-functions) nil (or
buffer-file-name (let ((filename ...)) (if (file-exists-p filename) (if
... ... ...)) (set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let ((dir
...)) (if (file-exists-p dir) nil (if ... ... ...)) (setq setmodes
(basic-save-buffer-1))))) (if buffer-file-name (progn (if
save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier (file-attributes buffer-file-name))) (if
setmodes (condition-case nil (progn ...) (error nil))) (vc-after-save)))
(delete-auto-save-file-if-necessary recent-save)) (run-hooks
'after-save-hook)) (or noninteractive (not called-interactively)
(files--message "(No changes need to be saved)")))
(save-current-buffer (if (buffer-base-buffer) (set-buffer
(buffer-base-buffer))) (if (or (buffer-modified-p) (and buffer-file-name
(not (file-exists-p buffer-file-name)))) (let ((recent-save
(recent-auto-save-p)) setmodes) (or (null buffer-file-name)
(verify-visited-file-modtime (current-buffer)) (not (file-exists-p
buffer-file-name)) (yes-or-no-p (format "%s has changed since visited or
saved. Save anywa..." (file-name-nondirectory buffer-file-name)))
(user-error "Save not confirmed")) (save-restriction (widen)
(save-excursion (and (> (point-max) (point-min)) (not
find-file-literally) (null buffer-read-only) (/= (char-after ...) 10)
(not (and ... ...)) (or (eq require-final-newline t) (eq
require-final-newline ...) (and require-final-newline ...))
(save-excursion (goto-char ...) (insert 10)))) (condition-case err
(run-hooks 'before-save-hook) ((debug error) (message "Before-save hook
error: %S" err) nil)) (if (run-hook-with-args-until-success
'write-contents-functions) nil (or buffer-file-name (let (...) (if ...
...) (set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let (...) (if
... nil ...) (setq setmodes ...)))) (if buffer-file-name (progn (if
save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier ...)) (if setmodes (condition-case nil
... ...)) (vc-after-save))) (delete-auto-save-file-if-necessary
recent-save)) (run-hooks 'after-save-hook)) (or noninteractive (not
called-interactively) (files--message "(No changes need to be saved)"))))
basic-save-buffer(t)
(let ((modp (buffer-modified-p)) (make-backup-files (or (and
make-backup-files (not (eq arg 0))) (memq arg '(16 64))))) (and modp
(memq arg '(16 64)) (setq buffer-backed-up nil)) (if (and modp
(buffer-file-name) (not noninteractive) (not save-silently)) (message
"Saving file %s..." (buffer-file-name))) (basic-save-buffer
(called-interactively-p 'any)) (and modp (memq arg '(4 64)) (setq
buffer-backed-up nil)))
save-buffer(1)
funcall-interactively(save-buffer 1)
command-execute(save-buffer)
</snip>
In GNU Emacs 30.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version
3.24.36, cairo version 1.16.0) of 2023-03-02 built on fafnir
Repository revision: a798a29f7519244b47ffc3035fcd8bf7bafea4d5
Repository branch: master
Windowing system distributor 'The X.Org Foundation', version 11.0.12101007
System Description: Debian GNU/Linux bookworm/sid
Configured using:
'configure --with-json=ifavailable --with-modules --with-harfbuzz
--with-compress-install --with-threads --with-included-regex
--with-zlib --with-cairo --without-rsvg --without-sound
--without-imagemagick --without-toolkit-scroll-bars --without-gpm
--without-dbus --without-pop --with-mailutils --without-gsettings
--with-native-compilation --with-gnutls=ifavailable'
Configured features:
ACL CAIRO FREETYPE GIF GLIB GMP GNUTLS HARFBUZZ JPEG JSON LCMS2 LIBOTF
LIBSELINUX LIBSYSTEMD LIBXML2 M17N_FLT MODULES NATIVE_COMP NOTIFY
INOTIFY PDUMPER PNG SECCOMP THREADS TIFF WEBP X11 XDBE XIM XINPUT2 XPM
GTK3 ZLIB
Important settings:
value of $LC_ALL: de_DE.UTF-8
value of $LC_MONETARY: de_DE.UTF-8
value of $LC_NUMERIC: de_DE.UTF-8
value of $LC_TIME: de_DE.UTF-8
value of $LANG: de_DE.UTF-8
value of $XMODIFIERS: @im=ibus
locale-coding-system: utf-8-unix
Major mode: Lisp Interaction
Minor modes in effect:
tooltip-mode: t
global-eldoc-mode: t
eldoc-mode: t
show-paren-mode: t
electric-indent-mode: t
mouse-wheel-mode: t
tool-bar-mode: t
menu-bar-mode: t
file-name-shadow-mode: t
global-font-lock-mode: t
font-lock-mode: t
blink-cursor-mode: t
line-number-mode: t
indent-tabs-mode: t
transient-mark-mode: t
auto-composition-mode: t
auto-encryption-mode: t
auto-compression-mode: t
Load-path shadows:
None found.
Features:
(shadow sort mail-extr emacsbug message mailcap yank-media puny dired
dired-loaddefs rfc822 mml mml-sec password-cache epa derived epg rfc6068
epg-config gnus-util text-property-search mm-decode mm-bodies mm-encode
mail-parse rfc2231 mailabbrev gmm-utils mailheader sendmail rfc2047
rfc2045 ietf-drums mm-util mail-prsvr mail-utils time-date cl-loaddefs
comp comp-cstr warnings icons subr-x rx cl-seq cl-macs gv cl-extra
help-mode bytecomp byte-compile cl-lib rmc iso-transl tooltip cconv
eldoc paren electric uniquify ediff-hook vc-hooks lisp-float-type
elisp-mode mwheel term/x-win x-win term/common-win x-dnd tool-bar dnd
fontset image regexp-opt fringe tabulated-list replace newcomment
text-mode lisp-mode prog-mode register page tab-bar menu-bar rfn-eshadow
isearch easymenu timer select scroll-bar mouse jit-lock font-lock syntax
font-core term/tty-colors frame minibuffer nadvice seq simple cl-generic
indonesian philippine cham georgian utf-8-lang misc-lang vietnamese
tibetan thai tai-viet lao korean japanese eucjp-ms cp51932 hebrew greek
romanian slovak czech european ethiopic indian cyrillic chinese
composite emoji-zwj charscript charprop case-table epa-hook
jka-cmpr-hook help abbrev obarray oclosure cl-preloaded button loaddefs
theme-loaddefs faces cus-face macroexp files window text-properties
overlay sha1 md5 base64 format env code-pages mule custom widget keymap
hashtable-print-readable backquote threads inotify lcms2 dynamic-setting
font-render-setting cairo move-toolbar gtk x-toolkit xinput2 x multi-tty
make-network-process native-compile emacs)
Memory information:
((conses 16 76587 8662)
(symbols 48 7136 0)
(strings 32 19323 2067)
(string-bytes 1 574138)
(vectors 16 15417)
(vector-slots 8 319353 13066)
(floats 8 28 54)
(intervals 56 234 0)
(buffers 976 11))
--------------lsyl3QpuvMpQCIPCVWLkFgCy
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: 8bit
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
</head>
<body>
<br>
<p>Hi there</p>
<p>emacs seems to be losing the encoding system when editing and
saving an epub file. <br>
</p>
<p>If needed I can provide a test epub file (ca. 250KB)</p>
<p>TIA</p>
<p>Heiner</p>
<p><br>
</p>
<p> </p>
<p style="line-height: 100%; margin-bottom: 0cm">
<font face="Courier New, Courier, monospace">test case 1)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Start <emacs -Q></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">1) enter epub <C-x
D> .../test.epub <ENTER></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">2) switch to edit In
DocView(?) <C-c C-c></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">3) open file
...4.html <Enter></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">4) change a line
(for instance " " => " ")</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">5) save file <C-x
C-f></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">6) Symptom: minibuffer
display "Wrong Type Argument: stringp, nil"</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">7) message Buffer</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Type C-c C-c to
toggle between editing or viewing the document.</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Parsing archive
file...done.</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Type C-c C-c to
toggle between editing or viewing the document.</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Saving file
/home/uuu/CaLib/Author/test (6551)/test -
author.epub:OEBPS/_public_vhost_g_gutenberg_html_files_3300_3300-h_3300-h-4.htm.html...</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Updating
archive...done</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">apply: Wrong type
argument: stringp, nil</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"></snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">test case 2)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">start emacs (with
custom init.el file)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">1) <M-x load-file
RET arc-mode.el></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> <M-x load-file
RET files.el></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> <M-x load-file
RET docview.el></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">2) zoom to test file <C-x D RET>
=> /test</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> dir entry test</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> <snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> drwxr-xr-x 2 user
ugrp 4096 17. Mär 08:58 .</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> drwxr-xr-x 3 user
ugrp 4096 17. Mär 09:06 ..</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 58207 17. Mär 08:06 cover.jpg</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 1237 17. Mär 08:06 metadata.opf</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 234869 17. Mär 08:58 test - Adam Smith.epub</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> </snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">3) open test - Adam
Smith.epub</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">4) minibuffer: Type
C-c C-c to toggle between editing or viewing the document.</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> <C-c C-c></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">5) open file <...
4.html RET></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">6) change file (for
instance " " => " "></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">7) save file <C-x
C-s></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">8) backtrace in
Appendix</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Symptoms:</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">9) buffers are
losing the encoding system (mode-line starts with "=:---
test..."</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">10 Directory buffer
display in basic mode(?) (mode-line starts with "U:%%- emac...)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> <snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 250080 1. Jun 2022 reset-W10-Admin-PW.odt</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 954390 17. Mär 08:03 test1.epub</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> -rw-r--r-- 1 user
ugrp 954390 17. Mär 07:55 test.epub</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> </snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Appendix: backtrace</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">Debugger
entered--Lisp error: (wrong-type-argument stringp nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> write-region(nil
nil nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (if (equal
buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region
nil
nil doc-view--buffer-file-name))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let
((revert-buffer-preserve-modes t)) (apply orig-fun args) (if
(equal
buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region
nil
nil doc-view--buffer-file-name)))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (closure ((args t
t) (orig-fun . #f(compiled-function (&rest args)
#<bytecode
-0x1d1afa23a289a2b6>)) revert-buffer-preserve-modes) nil (let
((revert-buffer-preserve-modes t)) (apply orig-fun args) (if
(equal
buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region
nil
nil doc-view--buffer-file-name))))()</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> funcall((closure
((args t t) (orig-fun . #f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>))
revert-buffer-preserve-modes)
nil (let ((revert-buffer-preserve-modes t)) (apply orig-fun
args) (if
(equal buffer-file-name doc-view--buffer-file-name) nil
(doc-view-make-safe-dir doc-view-cache-directory) (write-region
nil
nil doc-view--buffer-file-name)))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (if (and (eq 'pdf
doc-view-doc-type) (executable-find "pdfinfo")) (if (= 0
(call-process "pdfinfo" nil nil nil
doc-view--buffer-file-name)) (funcall --cl-revert--) (if
(called-interactively-p 'interactive) (progn (message "Can't
revert right now because the file is corrupt...")))) (funcall
--cl-revert--))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let*
((--cl-revert-- #'(lambda nil (let
((revert-buffer-preserve-modes t))
(apply orig-fun args) (if (equal buffer-file-name
doc-view--buffer-file-name) nil (doc-view-make-safe-dir
doc-view-cache-directory) (write-region nil nil
doc-view--buffer-file-name)))))) (if (and (eq 'pdf
doc-view-doc-type)
(executable-find "pdfinfo")) (if (= 0 (call-process
"pdfinfo" nil nil nil doc-view--buffer-file-name)) (funcall
--cl-revert--) (if (called-interactively-p 'interactive) (progn
(message "Can't revert right now because the file is
corrupt...")))) (funcall --cl-revert--)))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">
doc-view--revert-buffer(#f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>) t t)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> apply(doc-view--revert-buffer
#f(compiled-function (&rest args)
#<bytecode -0x1d1afa23a289a2b6>) (t t))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> #f(advice
doc-view--revert-buffer :around #f(compiled-function (&rest
args)
#<bytecode -0x1d1afa23a289a2b6>))(t t)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> apply(#f(advice
doc-view--revert-buffer :around #f(compiled-function (&rest
args)
#<bytecode -0x1d1afa23a289a2b6>)) t t nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let
((coding-system-for-read 'no-conversion)) (apply orig-fun t t
(cdr
(cdr args))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let ((no
(archive-get-lineno))) (setq archive-files nil) (let
((coding-system-for-read 'no-conversion)) (apply orig-fun t t
(cdr
(cdr args)))) (archive-mode) (goto-char archive-file-list-start)
(archive-next-line no))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> archive--mode-revert(#f(advice
doc-view--revert-buffer :around
#f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>)) nil nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> apply(archive--mode-revert #f(advice
doc-view--revert-buffer :around
#f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>)) (nil nil))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> #f(advice
archive--mode-revert :around #f(advice doc-view--revert-buffer
:around #f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>)))(nil nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> funcall(#f(advice
archive--mode-revert :around #f(advice doc-view--revert-buffer
:around #f(compiled-function (&rest args) #<bytecode
-0x1d1afa23a289a2b6>))) nil nil)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let
((revert-buffer-in-progress-p t) (revert-buffer-preserve-modes
preserve-modes) (state (and (boundp 'read-only-mode--state)
(list
read-only-mode--state)))) (funcall (or revert-buffer-function
#'revert-buffer--default) ignore-auto noconfirm) (if state
(progn
(setq buffer-read-only (car state)) (set (make-local-variable
'read-only-mode--state) (car state)))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> revert-buffer()</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (if (not
archive-remote) (revert-buffer) (archive-maybe-update nil))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (save-restriction
(message "Updating archive...") (widen) (let ((writer
(save-current-buffer (set-buffer archive-superior-buffer)
(archive-name "write-file-member"))) (archive
(save-current-buffer (set-buffer archive-superior-buffer)
(archive-maybe-copy (buffer-file-name))))) (if (fboundp writer)
(funcall writer archive archive-subfile-mode)
(archive-*-write-file-member archive archive-subfile-mode
(symbol-value writer))) (set-buffer-modified-p nil) (message
"Updating archive...done")) (set-buffer
archive-superior-buffer) (if (not archive-remote)
(revert-buffer)
(archive-maybe-update nil)))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (save-excursion
(save-restriction (message "Updating archive...") (widen)
(let ((writer (save-current-buffer (set-buffer
archive-superior-buffer) (archive-name "write-file-member")))
(archive (save-current-buffer (set-buffer
archive-superior-buffer)
(archive-maybe-copy (buffer-file-name))))) (if (fboundp writer)
(funcall writer archive archive-subfile-mode)
(archive-*-write-file-member archive archive-subfile-mode
(symbol-value writer))) (set-buffer-modified-p nil) (message
"Updating archive...done")) (set-buffer
archive-superior-buffer) (if (not archive-remote)
(revert-buffer)
(archive-maybe-update nil))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> archive-write-file-member()</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace">
run-hook-with-args-until-success(archive-write-file-member)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let
((dir
(file-name-directory (expand-file-name buffer-file-name)))) (if
(file-exists-p dir) nil (if (y-or-n-p (format-message "Directory
`%s' does not exist; create? " dir)) (make-directory dir t)
(error "Canceled"))) (setq setmodes
(basic-save-buffer-1))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (if
(run-hook-with-args-until-success 'write-contents-functions) nil
(or
buffer-file-name (let ((filename (expand-file-name
(read-file-name
"File to save in: " nil (expand-file-name ...))))) (if
(file-exists-p filename) (if (file-directory-p filename) (error
"%s
is a directory" filename) (if (y-or-n-p (format-message "File
`%s' exists; overwrite? " filename)) nil (error "Canceled"))))
(set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let
((dir
(file-name-directory (expand-file-name buffer-file-name)))) (if
(file-exists-p dir) nil (if (y-or-n-p (format-message "Directory
`%s' does not exist; create? " dir)) (make-directory dir t)
(error "Canceled"))) (setq setmodes
(basic-save-buffer-1)))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (save-restriction
(widen) (save-excursion (and (> (point-max) (point-min)) (not
find-file-literally) (null buffer-read-only) (/= (char-after (1-
(point-max))) 10) (not (and (eq selective-display t) (=
(char-after
(1- ...)) 13))) (or (eq require-final-newline t) (eq
require-final-newline 'visit-save) (and require-final-newline
(y-or-n-p (format "Buffer %s does not end in newline. Add one?
" (buffer-name))))) (save-excursion (goto-char (point-max))
(insert 10)))) (condition-case err (run-hooks 'before-save-hook)
((debug error) (message "Before-save hook error: %S" err)
nil)) (if (run-hook-with-args-until-success
'write-contents-functions) nil (or buffer-file-name (let
((filename
(expand-file-name (read-file-name "File to save in: " nil
...)))) (if (file-exists-p filename) (if (file-directory-p
filename)
(error "%s is a directory" filename) (if (y-or-n-p ...) nil
(error "Canceled")))) (set-visited-file-name filename)))
(vc-before-save) (or (run-hook-with-args-until-success
'local-write-file-hooks) (run-hook-with-args-until-success
'write-file-functions) (let ((dir (file-name-directory
(expand-file-name buffer-file-name)))) (if (file-exists-p dir)
nil
(if (y-or-n-p (format-message "Directory `%s' does not exist;
create? " dir)) (make-directory dir t) (error "Canceled")))
(setq setmodes (basic-save-buffer-1))))) (if buffer-file-name
(progn
(if save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier (file-attributes
buffer-file-name)))
(if setmodes (condition-case nil (progn (if (condition-case err
...
...) nil (set-file-extended-attributes buffer-file-name ...)))
(error
nil))) (vc-after-save))) (delete-auto-save-file-if-necessary
recent-save))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let ((recent-save
(recent-auto-save-p)) setmodes) (or (null buffer-file-name)
(verify-visited-file-modtime (current-buffer)) (not
(file-exists-p
buffer-file-name)) (yes-or-no-p (format "%s has changed since
visited or saved. Save anywa..." (file-name-nondirectory
buffer-file-name))) (user-error "Save not confirmed"))
(save-restriction (widen) (save-excursion (and (> (point-max)
(point-min)) (not find-file-literally) (null buffer-read-only)
(/=
(char-after (1- (point-max))) 10) (not (and (eq
selective-display t)
(= (char-after ...) 13))) (or (eq require-final-newline t) (eq
require-final-newline 'visit-save) (and require-final-newline
(y-or-n-p (format "Buffer %s does not end in newline. Add one?
" ...)))) (save-excursion (goto-char (point-max)) (insert 10))))
(condition-case err (run-hooks 'before-save-hook) ((debug error)
(message "Before-save hook error: %S" err) nil)) (if
(run-hook-with-args-until-success 'write-contents-functions) nil
(or
buffer-file-name (let ((filename (expand-file-name ...))) (if
(file-exists-p filename) (if (file-directory-p filename) (error
"%s
is a directory" filename) (if ... nil ...)))
(set-visited-file-name filename))) (vc-before-save) (or
(run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let
((dir
(file-name-directory ...))) (if (file-exists-p dir) nil (if
(y-or-n-p
...) (make-directory dir t) (error "Canceled"))) (setq
setmodes (basic-save-buffer-1))))) (if buffer-file-name (progn
(if
save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier (file-attributes
buffer-file-name)))
(if setmodes (condition-case nil (progn (if ... nil ...)) (error
nil))) (vc-after-save))) (delete-auto-save-file-if-necessary
recent-save)) (run-hooks 'after-save-hook))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (if (or
(buffer-modified-p) (and buffer-file-name (not (file-exists-p
buffer-file-name)))) (let ((recent-save (recent-auto-save-p))
setmodes) (or (null buffer-file-name)
(verify-visited-file-modtime
(current-buffer)) (not (file-exists-p buffer-file-name))
(yes-or-no-p
(format "%s has changed since visited or saved. Save anywa..."
(file-name-nondirectory buffer-file-name))) (user-error "Save
not confirmed")) (save-restriction (widen) (save-excursion (and
(> (point-max) (point-min)) (not find-file-literally) (null
buffer-read-only) (/= (char-after (1- ...)) 10) (not (and (eq
selective-display t) (= ... 13))) (or (eq require-final-newline
t)
(eq require-final-newline 'visit-save) (and
require-final-newline
(y-or-n-p ...))) (save-excursion (goto-char (point-max)) (insert
10)))) (condition-case err (run-hooks 'before-save-hook) ((debug
error) (message "Before-save hook error: %S" err) nil)) (if
(run-hook-with-args-until-success 'write-contents-functions) nil
(or
buffer-file-name (let ((filename ...)) (if (file-exists-p
filename)
(if ... ... ...)) (set-visited-file-name filename)))
(vc-before-save)
(or (run-hook-with-args-until-success 'local-write-file-hooks)
(run-hook-with-args-until-success 'write-file-functions) (let
((dir
...)) (if (file-exists-p dir) nil (if ... ... ...)) (setq
setmodes
(basic-save-buffer-1))))) (if buffer-file-name (progn (if
save-buffer-coding-system (setq save-buffer-coding-system
last-coding-system-used) (setq buffer-file-coding-system
last-coding-system-used)) (setq buffer-file-number
(file-attribute-file-identifier (file-attributes
buffer-file-name)))
(if setmodes (condition-case nil (progn ...) (error nil)))
(vc-after-save))) (delete-auto-save-file-if-necessary
recent-save))
(run-hooks 'after-save-hook)) (or noninteractive (not
called-interactively) (files--message "(No changes need to be
saved)")))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (save-current-buffer (if
(buffer-base-buffer) (set-buffer
(buffer-base-buffer))) (if (or (buffer-modified-p) (and
buffer-file-name (not (file-exists-p buffer-file-name)))) (let
((recent-save (recent-auto-save-p)) setmodes) (or (null
buffer-file-name) (verify-visited-file-modtime (current-buffer))
(not
(file-exists-p buffer-file-name)) (yes-or-no-p (format "%s has
changed since visited or saved. Save anywa..."
(file-name-nondirectory buffer-file-name))) (user-error "Save
not confirmed")) (save-restriction (widen) (save-excursion (and
(> (point-max) (point-min)) (not find-file-literally) (null
buffer-read-only) (/= (char-after ...) 10) (not (and ... ...))
(or
(eq require-final-newline t) (eq require-final-newline ...) (and
require-final-newline ...)) (save-excursion (goto-char ...)
(insert
10)))) (condition-case err (run-hooks 'before-save-hook) ((debug
error) (message "Before-save hook error: %S" err) nil)) (if
(run-hook-with-args-until-success 'write-contents-functions) nil
(or
buffer-file-name (let (...) (if ... ...) (set-visited-file-name
filename))) (vc-before-save) (or
(run-hook-with-args-until-success
'local-write-file-hooks) (run-hook-with-args-until-success
'write-file-functions) (let (...) (if ... nil ...) (setq
setmodes
...)))) (if buffer-file-name (progn (if
save-buffer-coding-system
(setq save-buffer-coding-system last-coding-system-used) (setq
buffer-file-coding-system last-coding-system-used)) (setq
buffer-file-number (file-attribute-file-identifier ...)) (if
setmodes
(condition-case nil ... ...)) (vc-after-save)))
(delete-auto-save-file-if-necessary recent-save)) (run-hooks
'after-save-hook)) (or noninteractive (not called-interactively)
(files--message "(No changes need to be saved)"))))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> basic-save-buffer(t)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> (let ((modp
(buffer-modified-p)) (make-backup-files (or (and
make-backup-files
(not (eq arg 0))) (memq arg '(16 64))))) (and modp (memq arg
'(16
64)) (setq buffer-backed-up nil)) (if (and modp
(buffer-file-name)
(not noninteractive) (not save-silently)) (message "Saving file
%s..." (buffer-file-name))) (basic-save-buffer
(called-interactively-p 'any)) (and modp (memq arg '(4 64))
(setq
buffer-backed-up nil)))</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> save-buffer(1)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> funcall-interactively(save-buffer 1)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"> command-execute(save-buffer)</font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"></snip></font></p>
<font face="Courier New, Courier, monospace">
</font>
<p style="line-height: 100%; margin-bottom: 0cm"><font face="Courier
New, Courier, monospace"><br>
</font>
</p>
<font face="Courier New, Courier, monospace">
</font>
<p>
<style type="text/css"><font face="Courier New, Courier, monospace">p { line-height: 115%; margin-bottom: 0.25cm; background: transparent }</font></style></p>
<emacs -q=""><c-x d=""><enter><c-c c-c=""><enter><c-x c-f=""><m-x
load-file="" ret="" arc-mode.el=""><m-x load-file=""
ret="" files.el=""><m-x load-file="" ret=""
docview.el=""><c-x d="" ret=""><c-c c-c=""><c-x
c-s=""><font face="Courier New, Courier,
monospace"><snip><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><bytecode
-0x1d1afa23a289a2b6=""><br>
</bytecode></bytecode></bytecode></bytecode></bytecode></bytecode></bytecode></bytecode></bytecode></bytecode></snip>
<br>
<br>
<br>
<br>
</font><br>
In GNU Emacs 30.0.50 (build 1,
x86_64-pc-linux-gnu, GTK+ Version
<br>
3.24.36, cairo version 1.16.0) of 2023-03-02
built on fafnir
<br>
Repository revision:
a798a29f7519244b47ffc3035fcd8bf7bafea4d5
<br>
Repository branch: master
<br>
Windowing system distributor 'The X.Org
Foundation', version 11.0.12101007
<br>
System Description: Debian GNU/Linux
bookworm/sid
<br>
<br>
Configured using:
<br>
'configure --with-json=ifavailable
--with-modules --with-harfbuzz
<br>
--with-compress-install --with-threads
--with-included-regex
<br>
--with-zlib --with-cairo --without-rsvg
--without-sound
<br>
--without-imagemagick
--without-toolkit-scroll-bars --without-gpm
<br>
--without-dbus --without-pop
--with-mailutils --without-gsettings
<br>
--with-native-compilation
--with-gnutls=ifavailable'
<br>
<br>
Configured features:
<br>
ACL CAIRO FREETYPE GIF GLIB GMP GNUTLS
HARFBUZZ JPEG JSON LCMS2 LIBOTF
<br>
LIBSELINUX LIBSYSTEMD LIBXML2 M17N_FLT
MODULES NATIVE_COMP NOTIFY
<br>
INOTIFY PDUMPER PNG SECCOMP THREADS TIFF
WEBP X11 XDBE XIM XINPUT2 XPM
<br>
GTK3 ZLIB
<br>
<br>
Important settings:
<br>
value of $LC_ALL: de_DE.UTF-8
<br>
value of $LC_MONETARY: de_DE.UTF-8
<br>
value of $LC_NUMERIC: de_DE.UTF-8
<br>
value of $LC_TIME: de_DE.UTF-8
<br>
value of $LANG: de_DE.UTF-8
<br>
value of $XMODIFIERS: @im=ibus
<br>
locale-coding-system: utf-8-unix
<br>
<br>
Major mode: Lisp Interaction
<br>
<br>
Minor modes in effect:
<br>
tooltip-mode: t
<br>
global-eldoc-mode: t
<br>
eldoc-mode: t
<br>
show-paren-mode: t
<br>
electric-indent-mode: t
<br>
mouse-wheel-mode: t
<br>
tool-bar-mode: t
<br>
menu-bar-mode: t
<br>
file-name-shadow-mode: t
<br>
global-font-lock-mode: t
<br>
font-lock-mode: t
<br>
blink-cursor-mode: t
<br>
line-number-mode: t
<br>
indent-tabs-mode: t
<br>
transient-mark-mode: t
<br>
auto-composition-mode: t
<br>
auto-encryption-mode: t
<br>
auto-compression-mode: t
<br>
<br>
Load-path shadows:
<br>
None found.
<br>
<br>
Features:
<br>
(shadow sort mail-extr emacsbug message
mailcap yank-media puny dired
<br>
dired-loaddefs rfc822 mml mml-sec
password-cache epa derived epg rfc6068
<br>
epg-config gnus-util text-property-search
mm-decode mm-bodies mm-encode
<br>
mail-parse rfc2231 mailabbrev gmm-utils
mailheader sendmail rfc2047
<br>
rfc2045 ietf-drums mm-util mail-prsvr
mail-utils time-date cl-loaddefs
<br>
comp comp-cstr warnings icons subr-x rx
cl-seq cl-macs gv cl-extra
<br>
help-mode bytecomp byte-compile cl-lib rmc
iso-transl tooltip cconv
<br>
eldoc paren electric uniquify ediff-hook
vc-hooks lisp-float-type
<br>
elisp-mode mwheel term/x-win x-win
term/common-win x-dnd tool-bar dnd
<br>
fontset image regexp-opt fringe
tabulated-list replace newcomment
<br>
text-mode lisp-mode prog-mode register page
tab-bar menu-bar rfn-eshadow
<br>
isearch easymenu timer select scroll-bar
mouse jit-lock font-lock syntax
<br>
font-core term/tty-colors frame minibuffer
nadvice seq simple cl-generic
<br>
indonesian philippine cham georgian
utf-8-lang misc-lang vietnamese
<br>
tibetan thai tai-viet lao korean japanese
eucjp-ms cp51932 hebrew greek
<br>
romanian slovak czech european ethiopic
indian cyrillic chinese
<br>
composite emoji-zwj charscript charprop
case-table epa-hook
<br>
jka-cmpr-hook help abbrev obarray oclosure
cl-preloaded button loaddefs
<br>
theme-loaddefs faces cus-face macroexp files
window text-properties
<br>
overlay sha1 md5 base64 format env
code-pages mule custom widget keymap
<br>
hashtable-print-readable backquote threads
inotify lcms2 dynamic-setting
<br>
font-render-setting cairo move-toolbar gtk
x-toolkit xinput2 x multi-tty
<br>
make-network-process native-compile emacs)
<br>
<br>
Memory information:
<br>
((conses 16 76587 8662)
<br>
(symbols 48 7136 0)
<br>
(strings 32 19323 2067)
<br>
(string-bytes 1 574138)
<br>
(vectors 16 15417)
<br>
(vector-slots 8 319353 13066)
<br>
(floats 8 28 54)
<br>
(intervals 56 234 0)
<br>
(buffers 976 11))
<br>
</c-x></c-c></c-x></m-x></m-x></m-x></c-x></enter></c-c></enter></c-x></emacs><br>
</body>
</html>
--------------lsyl3QpuvMpQCIPCVWLkFgCy--
Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) Content-Type: text/plain; charset=utf-8 X-Loop: help-debbugs@HIDDEN From: help-debbugs@HIDDEN (GNU bug Tracking System) To: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN> Subject: bug#62239: Acknowledgement (30.0.50; emacs 30.5.0 editing epub encoding system) Message-ID: <handler.62239.B.16790480128029.ack <at> debbugs.gnu.org> References: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN> X-Gnu-PR-Message: ack 62239 X-Gnu-PR-Package: emacs Reply-To: 62239 <at> debbugs.gnu.org Date: Fri, 17 Mar 2023 10:14:02 +0000 Thank you for filing a new bug report with debbugs.gnu.org. This is an automatically generated reply to let you know your message has been received. Your message is being forwarded to the package maintainers and other interested parties for their attention; they will reply in due course. Your message has been sent to the package maintainer(s): bug-gnu-emacs@HIDDEN If you wish to submit further information on this problem, please send it to 62239 <at> debbugs.gnu.org. Please do not send mail to help-debbugs@HIDDEN unless you wish to report a problem with the Bug-tracking system. --=20 62239: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D62239 GNU Bug Tracking System Contact help-debbugs@HIDDEN with problems
X-Loop: help-debbugs@HIDDEN
Subject: bug#62239: 30.0.50; emacs 30.5.0 editing epub encoding system
Resent-From: Michael Heerdegen <michael_heerdegen@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-gnu-emacs@HIDDEN
Resent-Date: Sat, 18 Mar 2023 00:07:01 +0000
Resent-Message-ID: <handler.62239.B62239.167909802022112 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 62239
X-GNU-PR-Package: emacs
X-GNU-PR-Keywords:
To: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN>
Cc: 62239 <at> debbugs.gnu.org
Received: via spool by 62239-submit <at> debbugs.gnu.org id=B62239.167909802022112
(code B ref 62239); Sat, 18 Mar 2023 00:07:01 +0000
Received: (at 62239) by debbugs.gnu.org; 18 Mar 2023 00:07:00 +0000
Received: from localhost ([127.0.0.1]:45894 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1pdK68-0005kZ-3Q
for submit <at> debbugs.gnu.org; Fri, 17 Mar 2023 20:07:00 -0400
Received: from mout.web.de ([212.227.15.4]:36395)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <michael_heerdegen@HIDDEN>) id 1pdK65-0005kH-Ms
for 62239 <at> debbugs.gnu.org; Fri, 17 Mar 2023 20:06:58 -0400
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=web.de; s=s29768273;
t=1679098010; i=michael_heerdegen@HIDDEN;
bh=9u1f3kWsnqXgZ8c0zpqCFxdXdunirQ3XyhJ1TmTv4EM=;
h=X-UI-Sender-Class:From:To:Cc:Subject:In-Reply-To:References:Date;
b=H4Wx3e0TI7IoyHL+dIa8EJnakjmUX9Oj2ufIEpQfHRxSEQe8O+tLgj4iqYoyUzr2l
78pHnuSfak3HapgIWimbp8GL7s1a2YyElKKLp+zc4Kfxplj8RdX2vnJ7WuV7F9MSJJ
caDvYIe00zfXlB6ElrQl/6gCKqWQBux2coz9AwlzKvbDT1HcgQ5cpjmfPRsO8IEksl
j+iim7ZelrMbgh9w9yoGoP+TgJhfg38vHVlxs1xSqnOccPAbNCEwQGFQ0AbSkG0Sfr
NA8pQS2G/CJ2DiX9/72COSFlTUKJ9UWBQxZSteCcMt2/pdkcVYnTzgmRsGL4k6fFJd
hLMJLjG+66ftQ==
X-UI-Sender-Class: 814a7b36-bfc1-4dae-8640-3722d8ec6cd6
Received: from drachen.dragon ([178.14.74.146]) by smtp.web.de (mrweb006
[213.165.67.108]) with ESMTPSA (Nemesis) id 1MLijs-1puzVK36cC-00HerK; Sat, 18
Mar 2023 01:06:50 +0100
From: Michael Heerdegen <michael_heerdegen@HIDDEN>
In-Reply-To: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN>
("H.-J. =?UTF-8?Q?Heitl=C3=A4nder?="'s message of "Fri, 17 Mar 2023
09:02:16 +0000")
References: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN>
Date: Sat, 18 Mar 2023 01:06:47 +0100
Message-ID: <87lejudiso.fsf@HIDDEN>
User-Agent: Gnus/5.13 (Gnus v5.13)
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-Provags-ID: V03:K1:hzFMIAEp5RNxulzweU6ir8nrBz0ts3TXrMp6C4xiz2phjM4lqLy
YlynqvoLmR30xlbnzvUaPK721xi7Upxsq+4AlEupMX+ubICXwrLMjJhbWBzCpkROSIlhxtX
GhZ9C6JIlY/ViQmYZrKllCQ+Pa1sLz7e50yPBXU5opn1hymO8rKQ73Ad3Nzvu94zRCzoW7y
pxekjusdppULF9VUlgxiw==
X-Spam-Flag: NO
UI-OutboundReport: notjunk:1;M01:P0:ALZXOfpEFLQ=;tyqcFit20QfA3YjyOQM9d1wUcVk
W1AYyRiQfV4BBrG0Bkyb4iYmaRuran6wXZ1fwaMzzDX3IGmvLfe5lJub1KRTyJaqfqEI+P1gJ
8fgqCzeKLhVImRD+xA91h5rIU2ATlQcNgzWfXVNoQWQ7GW2kkob8Qf87nmVG2trbOT0OiVo7h
+Bgp2hxDFxmUKN4A0yucys1BonMrLRZdrs03qO9wn9CPjkeNpajhqAyTmQR96T5GYwYMNdX/d
DKNyPYsSAOa1iqWsQw/36MSU/kkAbVebwrHVcMFybXpRx07nqzakW0cXEhgWhC6Az/EWxVUPP
PyZwAlh0RaqZ2LkJY1e25guF2zJS1DaJFu2chWV+mU7mO6HOOvjh/ZhzDC5JL3jXsJaU/TsXU
tAGGvLpHf9frWDvLgVcQTrWwMWnFJ1LUnikOZ5ntK703ZpjD+GYyFAnKIp5FlVwe8RmO/2RCv
zIxSxUW4OJfNA4Kxglfp2nSK98mWsSeEZNFtv8FYVdR1aoIqmIc4HDPEkugU4fcpZtN+Bnmow
vicq8F6yJq6Lot6TOoYlFTugXdV+d7oJTr9hUWmVzInc61+vr236M6Yts1sLFpxibX+dSld6d
l0wKxVuYdTE/6yzElnQ5fFDtFkz8f9JZJYQ02ohtvtv/iwuRA9Zt50lYMxCPQBqI96B41T891
adBa0Yrb3JImIDpns5FzfOyo6l3Jp20VT6OOPCaNX4Wjs90EoOlzLuxhygLBNax6WNdQfLeRQ
y82IEnoRgT50Hnge4H5ObWLBzGaVlu6BYNI1FwKJNG/PrsBtpPrlqtMu63h33VVKW08wI2J69
o2gxQ8wWsS5GPfkdjzHFzv6ZDi8DfUep4uadrBUgplW1srrcg566fEcMKvWdmDcN+k5HUWLZs
dLzbYv/rIaoi1qPMd1MEyPk2eqSXpzEerbgerdDHg/KS+owh/cxVYTilChYMecXOD3H+WyNg5
x5Glvg==
X-Spam-Score: -0.7 (/)
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -1.7 (-)
--=-=-=
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
H.-J. Heitl=C3=A4nder <Heiner.Heitlaender@HIDDEN> writes:
> 1) enter epub <C-x D> .../test.epub <ENTER>
>
> 2) switch to edit In DocView(?) <C-c C-c>
>
> 3) open file ...4.html <Enter>
>
> 4) change a line (for instance " " =3D> " ")
>
> 5) save file <C-x C-f>
>
> 6) Symptom: minibuffer display "Wrong Type Argument: stringp, nil"
When this error happens, is the epub opened in archive-mode or
doc-view-mode?
When in doc-view-mode I get a different error:
| Debugger entered--Lisp error: (void-variable archive-nil-write-file-membe=
r)
| (symbol-value archive-nil-write-file-member)
| (archive-*-write-file-member archive archive-subfile-mode (symbol-value=
writer))
| (if (fboundp writer) (funcall writer archive archive-subfile-mode) (arc=
hive-*-write-file-member archive archive-subfile-mode (symbol-value writer)=
))
| (let ((writer (save-current-buffer (set-buffer archive-superior-buffer)=
(archive-name "write-file-member"))) (archive (save-current-buffer (set-bu=
ffer archive-superior-buffer) (archive-maybe-copy (buffer-file-name))))) (i=
f (fboundp writer) (funcall writer archive archive-subfile-mode) (archive-*=
-write-file-member archive archive-subfile-mode (symbol-value writer))) (se=
t-buffer-modified-p nil) (message "Updating archive...done"))
| (save-restriction (message "Updating archive...") (widen) (let ((writer=
(save-current-buffer (set-buffer archive-superior-buffer) (archive-name "w=
rite-file-member"))) (archive (save-current-buffer (set-buffer archive-supe=
rior-buffer) (archive-maybe-copy (buffer-file-name))))) (if (fboundp writer=
) (funcall writer archive archive-subfile-mode) (archive-*-write-file-membe=
r archive archive-subfile-mode (symbol-value writer))) (set-buffer-modified=
-p nil) (message "Updating archive...done")) (set-buffer archive-superior-b=
uffer) (if (not archive-remote) (revert-buffer) (archive-maybe-update nil)))
| (save-excursion (save-restriction (message "Updating archive...") (wide=
n) (let ((writer (save-current-buffer (set-buffer archive-superior-buffer) =
(archive-name "write-file-member"))) (archive (save-current-buffer (set-buf=
fer archive-superior-buffer) (archive-maybe-copy (buffer-file-name))))) (if=
(fboundp writer) (funcall writer archive archive-subfile-mode) (archive-*-=
write-file-member archive archive-subfile-mode (symbol-value writer))) (set=
-buffer-modified-p nil) (message "Updating archive...done")) (set-buffer ar=
chive-superior-buffer) (if (not archive-remote) (revert-buffer) (archive-ma=
ybe-update nil))))
| (archive-write-file-member)
| (run-hook-with-args-until-success archive-write-file-member)
| (basic-save-buffer nil)
| (save-buffer)
When I hit C-c C-c to leave doc-view-mode and return to the archive view,
I get an error like you posted.
doc-view-mode doesn't remove its installed advice on
`buffer-revert-function' when hitting C-c C-c, and this simple fix seems
to help to avoid the error above (could you maybe try that please?):
--=-=-=
Content-Type: text/x-diff
Content-Disposition: attachment; filename=62239.patch
diff --git a/lisp/doc-view.el b/lisp/doc-view.el
index b14655fb274..00240ebf08d 100644
--- a/lisp/doc-view.el
+++ b/lisp/doc-view.el
@@ -2204,7 +2204,9 @@ doc-view-mode
(add-hook 'change-major-mode-hook
(lambda ()
(doc-view-kill-proc)
- (remove-overlays (point-min) (point-max) 'doc-view t))
+ (remove-overlays (point-min) (point-max) 'doc-view t)
+ (remove-function (local 'revert-buffer-function)
+ #'doc-view--revert-buffer))
nil t)
(add-hook 'clone-indirect-buffer-hook #'doc-view-clone-buffer-hook nil t)
(add-hook 'kill-buffer-hook #'doc-view-kill-proc nil t)
--=-=-=
Content-Type: text/plain
> 10 Directory buffer display in basic mode(?) (mode-line starts with "U:%%-
> emac...)
Is this the dired buffer or the buffer showing the archive contents?
Does the patch above help with this problem (assuming it is caused by
the error you got)?
TIA,
Michael.
--=-=-=--
X-Loop: help-debbugs@HIDDEN
Subject: bug#62239: patch feedback
References: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN>
In-Reply-To: <6445c1ab-07e5-1473-c4a0-9e4f21f4eb6d@HIDDEN>
Resent-From: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN>
Original-Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
Resent-CC: bug-gnu-emacs@HIDDEN
Resent-Date: Mon, 27 Mar 2023 13:15:06 +0000
Resent-Message-ID: <handler.62239.B62239.167992284720489 <at> debbugs.gnu.org>
Resent-Sender: help-debbugs@HIDDEN
X-GNU-PR-Message: followup 62239
X-GNU-PR-Package: emacs
X-GNU-PR-Keywords:
To: 62239 <at> debbugs.gnu.org
Received: via spool by 62239-submit <at> debbugs.gnu.org id=B62239.167992284720489
(code B ref 62239); Mon, 27 Mar 2023 13:15:06 +0000
Received: (at 62239) by debbugs.gnu.org; 27 Mar 2023 13:14:07 +0000
Received: from localhost ([127.0.0.1]:46764 helo=debbugs.gnu.org)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
id 1pgmfm-0005KO-NX
for submit <at> debbugs.gnu.org; Mon, 27 Mar 2023 09:14:07 -0400
Received: from mout01.posteo.de ([185.67.36.65]:38217)
by debbugs.gnu.org with esmtp (Exim 4.84_2)
(envelope-from <Heiner.Heitlaender@HIDDEN>) id 1pgiCq-00034V-7j
for 62239 <at> debbugs.gnu.org; Mon, 27 Mar 2023 04:27:57 -0400
Received: from submission (posteo.de [185.67.36.169])
by mout01.posteo.de (Postfix) with ESMTPS id E2DA3240084
for <62239 <at> debbugs.gnu.org>; Mon, 27 Mar 2023 10:27:49 +0200 (CEST)
DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=posteo.de; s=2017;
t=1679905669; bh=LhKVGzatNtG5ydHGlYAuToTEb3iMcAQQJIolk9WAOkk=;
h=Date:To:From:Subject:From;
b=dkhgRfgplmx7nCYFagADnojheGNby+c76N6ATdNSJqtVl/ryhTP2w0hxg3qKZfDfy
gj1Hqi5EnMQ024gM7q8nrJYUeJ25IUtTa9BNmTwz+I6toXiGttwudd9W3sr7G4+aHb
L/HZ2HGsIeZpI9zFPNzrwGXZWTX8GVLJxhxF7Qpf9NdAqxHzufxLW6wFpmkawLL4q5
Zt2v/Q1TEFs2EQlRYASJpm9+LOn3BhuutH3TuvumbpAo7EuTHkmKQS5N2b1ixeTWFr
Trwr80BZ+qIJHOHDgp4Pwvxc3OMiIB2lzB4nf8T2ZhOxtZ6BoKML/T5ruQsUtHH2wc
bOeUL0VCx7C4A==
Received: from customer (localhost [127.0.0.1])
by submission (posteo.de) with ESMTPSA id 4PlQtD5Jrsz9rxW
for <62239 <at> debbugs.gnu.org>; Mon, 27 Mar 2023 10:27:48 +0200 (CEST)
Content-Type: multipart/mixed; boundary="------------pW8YK0wnYg1Xvk79kLd5lsWv"
Message-ID: <5a6682df-f4fc-5ce7-1d04-6f40b5e2d955@HIDDEN>
Date: Mon, 27 Mar 2023 08:27:48 +0000
MIME-Version: 1.0
Content-Language: de-DE
From: H.-J. =?UTF-8?Q?Heitl=C3=A4nder?= <Heiner.Heitlaender@HIDDEN>
X-Spam-Score: -2.3 (--)
X-Mailman-Approved-At: Mon, 27 Mar 2023 09:14:06 -0400
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>,
<mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -3.3 (---)
This is a multi-part message in MIME format.
--------------pW8YK0wnYg1Xvk79kLd5lsWv
Content-Type: text/plain; charset=UTF-8; format=flowed
Content-Transfer-Encoding: 7bit
Hi there,
Michael Heerdegen developed a patch for the problem.
Feedback: apply patch - not quite successfull
When trying to apply the patch
M-diff-mode
open patch-file
M-n
C-c C-a
I get "Hunk seriously messed up"
If I understand diff correctly, the patch aims for line 2204 =
"(add-hook 'change-major-mode-hook..."
In my version of doc-view.el that line: "(add-hook
'change-major-mode-hook..." is contained in line 2207.
That is probably the reason for "Hunk seriously messed up"
... So what I did is: I changed the source code of view-doc.el manually
and not via the delevered patch. Then I tested it and ...
TADA!!! Success!!! It works.
Thanks for the effort
Heiner
--------------pW8YK0wnYg1Xvk79kLd5lsWv
Content-Type: text/x-patch; charset=UTF-8; name="62239.patch"
Content-Disposition: attachment; filename="62239.patch"
Content-Transfer-Encoding: base64
ZGlmZiAtLWdpdCBhL2xpc3AvZG9jLXZpZXcuZWwgYi9saXNwL2RvYy12aWV3LmVsCmluZGV4
IGIxNDY1NWZiMjc0Li4wMDI0MGViZjA4ZCAxMDA2NDQKLS0tIGEvbGlzcC9kb2Mtdmlldy5l
bAorKysgYi9saXNwL2RvYy12aWV3LmVsCkBAIC0yMjA0LDcgKzIyMDQsOSBAQCBkb2Mtdmll
dy1tb2RlCiAgICAgKGFkZC1ob29rICdjaGFuZ2UtbWFqb3ItbW9kZS1ob29rCiAJICAgICAg
KGxhbWJkYSAoKQogCQkoZG9jLXZpZXcta2lsbC1wcm9jKQotCQkocmVtb3ZlLW92ZXJsYXlz
IChwb2ludC1taW4pIChwb2ludC1tYXgpICdkb2MtdmlldyB0KSkKKwkJKHJlbW92ZS1vdmVy
bGF5cyAocG9pbnQtbWluKSAocG9pbnQtbWF4KSAnZG9jLXZpZXcgdCkKKyAgICAgICAgICAg
ICAgICAocmVtb3ZlLWZ1bmN0aW9uIChsb2NhbCAncmV2ZXJ0LWJ1ZmZlci1mdW5jdGlvbikK
KyAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICMnZG9jLXZpZXctLXJldmVydC1i
dWZmZXIpKQogCSAgICAgIG5pbCB0KQogICAgIChhZGQtaG9vayAnY2xvbmUtaW5kaXJlY3Qt
YnVmZmVyLWhvb2sgIydkb2Mtdmlldy1jbG9uZS1idWZmZXItaG9vayBuaWwgdCkKICAgICAo
YWRkLWhvb2sgJ2tpbGwtYnVmZmVyLWhvb2sgIydkb2Mtdmlldy1raWxsLXByb2MgbmlsIHQp
--------------pW8YK0wnYg1Xvk79kLd5lsWv--
Received: (at control) by debbugs.gnu.org; 12 Sep 2023 00:13:16 +0000 From debbugs-submit-bounces <at> debbugs.gnu.org Mon Sep 11 20:13:16 2023 Received: from localhost ([127.0.0.1]:55371 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>) id 1qfr1o-0006ib-Ic for submit <at> debbugs.gnu.org; Mon, 11 Sep 2023 20:13:16 -0400 Received: from mail-lj1-x230.google.com ([2a00:1450:4864:20::230]:54425) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from <stefankangas@HIDDEN>) id 1qfr1n-0006iL-1c for control <at> debbugs.gnu.org; Mon, 11 Sep 2023 20:13:15 -0400 Received: by mail-lj1-x230.google.com with SMTP id 38308e7fff4ca-2bf6b37859eso58190911fa.0 for <control <at> debbugs.gnu.org>; Mon, 11 Sep 2023 17:13:10 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20221208; t=1694477585; x=1695082385; darn=debbugs.gnu.org; h=to:subject:message-id:date:mime-version:from:from:to:cc:subject :date:message-id:reply-to; bh=9TMO67R10aTNxzuKPpAuJuS8i3o3hBGkt4JnNWKgeQA=; b=gnSTatBaxvmVBo1mUx8GI21Obe68FBcUGHrIILJLIs0MxKX3TQaP9FYkohJWLmM/g/ QTzUUfyUaigUQp63aX+DaSSZCDm5jx/HTpFYBk4CVmtF9lsx87yImF0UYHsnjhvADnOw tD87VpNWklYewEkRXNpPPLrUt9prmRKGQBE8gQZPR5FdJ3hcgYrEuqiQZ2eegJpjcMIM yU3Sd2okA1CrjibSREmuj6miQB/SYo4uV65cRF5cqwJHTQUpxwmd2AD6HRyLKBAEmSI4 jtbTjHe04HC47WllXY+7lcuZhPgE5ZCfNr9JvNSbUTKVDEzdinI0ahoMy9gW+MtckIoh fzaA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20230601; t=1694477585; x=1695082385; h=to:subject:message-id:date:mime-version:from:x-gm-message-state :from:to:cc:subject:date:message-id:reply-to; bh=9TMO67R10aTNxzuKPpAuJuS8i3o3hBGkt4JnNWKgeQA=; b=RGoFe+blYvMGtQKwqKZnZcH4omG6o/GJZXrIsSGeBzaoPbfb7PoaRC8QpK7r/cvV58 sIKYAf262bpi42LHJZ8owZ5KVHiWA7oFBuh99/bh1sG8eS85bMEJ758Pdt3f8mWZlZ8O ek4umRydPw5Ug1UFjbS6dalzt3znePyUJyAVWQRYhwQsjQ6S6Y5TNzhhECSj/kbUNWpQ NxSqmNAVwi0fW7wxyH66JqBvLUBEvudAwaZ7uxsX21q+Rwlofds+cI6oxinuCXooDTHH usIrwcdcsYpTSMNP97p2GEllDSXihZXYihq5xacIiygmQeN2z8KnF62put3jodVfAPJ7 APbA== X-Gm-Message-State: AOJu0YxHxa7RXAuWD29F92mCG429rvmJKwnoAPoQvjAD4PbTgumf26wP BvB6odnl3YzB+M9/RIxjVZtwovKe5IfY78Zs67m8Rc1kvIY= X-Google-Smtp-Source: AGHT+IH5SHfoYOlDuyS7aRDUolyM2Z9jS5kqUKr9Y3Af42QSpRvH4z1M+zMXsXDVKLyIK6ektSTSXU48+jwx4vWdUGQ= X-Received: by 2002:a05:651c:168b:b0:2bf:6852:9339 with SMTP id bd11-20020a05651c168b00b002bf68529339mr7894369ljb.3.1694477584669; Mon, 11 Sep 2023 17:13:04 -0700 (PDT) Received: from 753933720722 named unknown by gmailapi.google.com with HTTPREST; Mon, 11 Sep 2023 17:13:04 -0700 From: Stefan Kangas <stefankangas@HIDDEN> MIME-Version: 1.0 Date: Mon, 11 Sep 2023 17:13:04 -0700 Message-ID: <CADwFkmmVeZE3_t0c1DTB2ZjBHnSrDSvz_Pfmtb6cGu3GzQYf9Q@HIDDEN> Subject: control message for bug #62239 To: control <at> debbugs.gnu.org Content-Type: text/plain; charset="UTF-8" X-Spam-Score: 0.0 (/) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit <at> debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: <debbugs-submit.debbugs.gnu.org> List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe> List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/> List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org> List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help> List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe> Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org> X-Spam-Score: -1.0 (-) tags 62239 + patch quit
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997 nCipher Corporation Ltd,
1994-97 Ian Jackson.