From: Angelo Graziosi <angelo.g0@libero.it>
To: Eli Zaretskii <eliz@gnu.org>
Cc: sebastian_rose@gmx.de, hong@topbug.net, emacs-devel@gnu.org
Subject: Re: Current master does not work with sr-speedbar package (W64 build)
Date: Thu, 6 Dec 2018 18:49:58 +0100 (CET) [thread overview]
Message-ID: <1266357133.430788.1544118598533@mail.libero.it> (raw)
In-Reply-To: <D5D79C9B-A284-4F9E-96F0-98B245C36EE5@gnu.org>
> Il 6 dicembre 2018 alle 13.57 Eli Zaretskii <eliz@gnu.org> ha scritto:
>
> Type "M-x set-variable RET debug-on-error RET t RET", then do the steps needed to trigger the problem. Emacs should display a buffer with Lisp backtrace; post that here.
>
Starting Emacs without initialization file/directory and with Options - Manage Emacs Packages.
Debugger entered--Lisp error: (file-error "Setting current directory" #("Permission denied" 0 17 (charset windows-1252)) "c:/msys64/tmp/emacs-master/src/")
signal(file-error ("Setting current directory" #("Permission denied" 0 17 (charset windows-1252)) "c:/msys64/tmp/emacs-master/src/"))
(if nil nil (signal (car err) (cdr err)))
(condition-case err (progn (let* ((er (and t (plist-get status :error)))) (if er (error "Error retrieving: %s %S" url er))) (save-current-buffer (set-buffer b-sym) (goto-char (point-min)) (if (search-forward-regexp "^\15?\n\15?" nil 'noerror) nil (error "Error retrieving: %s %S" url "incomprehensible buffer"))) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char (point-min)) t) (error (package--update-downloads-in-progress archive) (if nil nil (signal (car err) (cdr err)))))
(if (condition-case err (progn (let* ((er (and t (plist-get status :error)))) (if er (error "Error retrieving: %s %S" url er))) (save-current-buffer (set-buffer b-sym) (goto-char (point-min)) (if (search-forward-regexp "^\15?\n\15?" nil 'noerror) nil (error "Error retrieving: %s %S" url "incomprehensible buffer"))) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char (point-min)) t) (error (package--update-downloads-in-progress archive) (if nil nil (signal (car err) (cdr err))))) (progn (let* ((location (cdr archive)) (name (car archive)) (content (buffer-string)) (dir (expand-file-name (concat "archives/" name) package-user-dir)) (local-file (expand-file-name file dir))) (if (listp (read content)) (progn (make-directory dir t) (if (or (not package-check-signature) (memb
er name package-unsigned-archives)) (progn (write-region content nil local-file nil ...) (package--update-downloads-in-progress archive)) (package--check-signature location file content async #'... #'...)))))))
(progn (if (condition-case err (progn (let* ((er (and t ...))) (if er (error "Error retrieving: %s %S" url er))) (save-current-buffer (set-buffer b-sym) (goto-char (point-min)) (if (search-forward-regexp "^\15?\n\15?" nil 'noerror) nil (error "Error retrieving: %s %S" url "incomprehensible buffer"))) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char (point-min)) t) (error (package--update-downloads-in-progress archive) (if nil nil (signal (car err) (cdr err))))) (progn (let* ((location (cdr archive)) (name (car archive)) (content (buffer-string)) (dir (expand-file-name (concat "archives/" name) package-user-dir)) (local-file (expand-file-name file dir))) (if (listp (read content)) (progn (make-directory dir t) (if (or ... ...) (progn ... ...) (package--check-signature
location file content async ... ...))))))))
(unwind-protect (progn (if (condition-case err (progn (let* ((er ...)) (if er (error "Error retrieving: %s %S" url er))) (save-current-buffer (set-buffer b-sym) (goto-char (point-min)) (if (search-forward-regexp "^\15?\n\15?" nil ...) nil (error "Error retrieving: %s %S" url "incomprehensible buffer"))) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char (point-min)) t) (error (package--update-downloads-in-progress archive) (if nil nil (signal (car err) (cdr err))))) (progn (let* ((location (cdr archive)) (name (car archive)) (content (buffer-string)) (dir (expand-file-name ... package-user-dir)) (local-file (expand-file-name file dir))) (if (listp (read content)) (progn (make-directory dir t) (if ... ... ...))))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffe
r)))
(save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (condition-case err (progn (let* (...) (if er ...)) (save-current-buffer (set-buffer b-sym) (goto-char ...) (if ... nil ...)) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char (point-min)) t) (error (package--update-downloads-in-progress archive) (if nil nil (signal ... ...)))) (progn (let* ((location ...) (name ...) (content ...) (dir ...) (local-file ...)) (if (listp ...) (progn ... ...)))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))
(let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (condition-case err (progn (let* ... ...) (save-current-buffer ... ... ...) (url-insert-buffer-contents b-sym url) (kill-buffer b-sym) (goto-char ...) t) (error (package--update-downloads-in-progress archive) (if nil nil ...))) (progn (let* (... ... ... ... ...) (if ... ...))))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))
(let ((b-sym (current-buffer))) (require 'url-handlers) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if (condition-case err (progn ... ... ... ... ... t) (error ... ...)) (progn (let* ... ...)))) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))
(closure ((temp-buffer . #<killed buffer>) (url . "https://elpa.gnu.org/packages/archive-contents") (url-1 . "https://elpa.gnu.org/packages/") (async . t) (file . "archive-contents") (archive "gnu" . "https://elpa.gnu.org/packages/") package-quickstart-file cl-struct-package--ac-desc-tags warning-minimum-level autoload-timestamps generated-autoload-file tar-parse-info Info-directory-list cl-struct-package--bi-desc-tags cl-struct-package-desc-tags t) (status) (let ((b-sym (current-buffer))) (require 'url-handlers) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))))))((:peer (:certificates ((:version 3 :serial-number "03:e9:84:8e:54:a5:e0:73:ad:eb
:85:06:03:50:c3:79:f2..." :issuer "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :valid-from "2018-11-27" :valid-to "2019-02-25" :subject "CN=elpa.gnu.org" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:54:a6:1b:e5:6d:9f:62:a6:11:ec:90:83:af:3f:28:..." :certificate-id "sha1:a0:a4:2a:bc:a4:d3:e2:90:1b:e3:23:a6:8f:e3:85:...") (:version 3 :serial-number "0a:01:41:42:00:00:01:53:85:73:6a:0b:85:ec:a7:08" :issuer "O=Digital Signature Trust Co.,CN=DST Root CA X3" :valid-from "2016-03-17" :valid-to "2021-03-17" :subject "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:da:9b:52:a8:77:11:69:d3:13:1
8:a5:67:e1:dc:9b:..." :certificate-id "sha1:e6:a3:b4:5b:06:2d:50:9b:33:82:28:2d:19:6e:fe:...")) :certificate (:version 3 :serial-number "03:e9:84:8e:54:a5:e0:73:ad:eb:85:06:03:50:c3:79:f2..." :issuer "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :valid-from "2018-11-27" :valid-to "2019-02-25" :subject "CN=elpa.gnu.org" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:54:a6:1b:e5:6d:9f:62:a6:11:ec:90:83:af:3f:28:..." :certificate-id "sha1:a0:a4:2a:bc:a4:d3:e2:90:1b:e3:23:a6:8f:e3:85:...") :key-exchange "ECDHE-RSA" :protocol "TLS1.2" :cipher "AES-256-GCM" :mac "AEAD")))
apply((closure ((temp-buffer . #<killed buffer>) (url . "https://elpa.gnu.org/packages/archive-contents") (url-1 . "https://elpa.gnu.org/packages/") (async . t) (file . "archive-contents") (archive "gnu" . "https://elpa.gnu.org/packages/") package-quickstart-file cl-struct-package--ac-desc-tags warning-minimum-level autoload-timestamps generated-autoload-file tar-parse-info Info-directory-list cl-struct-package--bi-desc-tags cl-struct-package-desc-tags t) (status) (let ((b-sym (current-buffer))) (require 'url-handlers) (let ((temp-buffer (generate-new-buffer " *temp*"))) (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn (if ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer))))))) (:peer (:certificates ((:version 3 :serial-number "03:e9:84:8e:54:a5:e0:73
:ad:eb:85:06:03:50:c3:79:f2..." :issuer "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :valid-from "2018-11-27" :valid-to "2019-02-25" :subject "CN=elpa.gnu.org" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:54:a6:1b:e5:6d:9f:62:a6:11:ec:90:83:af:3f:28:..." :certificate-id "sha1:a0:a4:2a:bc:a4:d3:e2:90:1b:e3:23:a6:8f:e3:85:...") (:version 3 :serial-number "0a:01:41:42:00:00:01:53:85:73:6a:0b:85:ec:a7:08" :issuer "O=Digital Signature Trust Co.,CN=DST Root CA X3" :valid-from "2016-03-17" :valid-to "2021-03-17" :subject "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:da:9b:52:a8:77:11:69:d
3:13:18:a5:67:e1:dc:9b:..." :certificate-id "sha1:e6:a3:b4:5b:06:2d:50:9b:33:82:28:2d:19:6e:fe:...")) :certificate (:version 3 :serial-number "03:e9:84:8e:54:a5:e0:73:ad:eb:85:06:03:50:c3:79:f2..." :issuer "C=US,O=Let's Encrypt,CN=Let's Encrypt Authority X3" :valid-from "2018-11-27" :valid-to "2019-02-25" :subject "CN=elpa.gnu.org" :public-key-algorithm "RSA" :certificate-security-level "Medium" :signature-algorithm "RSA-SHA256" :public-key-id "sha1:54:a6:1b:e5:6d:9f:62:a6:11:ec:90:83:af:3f:28:..." :certificate-id "sha1:a0:a4:2a:bc:a4:d3:e2:90:1b:e3:23:a6:8f:e3:85:...") :key-exchange "ECDHE-RSA" :protocol "TLS1.2" :cipher "AES-256-GCM" :mac "AEAD")))
url-http-activate-callback()
url-http-content-length-after-change-function(37118 40106 2988)
url-http-generic-filter(#<process elpa.gnu.org> "ypermedia\")\n (:url . \"http://elpa.gnu.org/pa...")
next prev parent reply other threads:[~2018-12-06 17:49 UTC|newest]
Thread overview: 40+ messages / expand[flat|nested] mbox.gz Atom feed top
2018-12-04 17:50 Current master does not work with sr-speedbar package (W64 build) Angelo Graziosi
2018-12-04 17:57 ` Eli Zaretskii
2018-12-04 23:31 ` Angelo Graziosi
2018-12-05 18:34 ` Eli Zaretskii
2018-12-05 22:42 ` Angelo Graziosi
2018-12-05 23:07 ` Angelo Graziosi
2018-12-06 0:07 ` Angelo Graziosi
2018-12-06 0:12 ` Angelo Graziosi
2018-12-06 0:54 ` Angelo Graziosi
2018-12-06 6:48 ` Eli Zaretskii
2018-12-06 9:10 ` martin rudalics
2018-12-06 16:12 ` Angelo Graziosi
2018-12-06 6:35 ` Eli Zaretskii
2018-12-06 9:00 ` Angelo Graziosi
2018-12-06 9:17 ` Eli Zaretskii
2018-12-06 11:28 ` Angelo Graziosi
2018-12-06 12:57 ` Eli Zaretskii
2018-12-06 17:49 ` Angelo Graziosi [this message]
2018-12-06 18:20 ` Eli Zaretskii
2018-12-06 19:36 ` Angelo Graziosi
2018-12-06 19:47 ` Eli Zaretskii
2018-12-06 20:45 ` Angelo Graziosi
2018-12-06 23:55 ` Angelo Graziosi
2018-12-07 8:04 ` Eli Zaretskii
2018-12-07 8:57 ` Eli Zaretskii
2018-12-07 16:34 ` Angelo Graziosi
2018-12-07 16:44 ` Eli Zaretskii
2018-12-07 6:22 ` Eli Zaretskii
2018-12-07 8:34 ` Angelo Graziosi
2018-12-07 0:36 ` Stefan Monnier
2018-12-07 7:13 ` martin rudalics
2018-12-07 13:00 ` Stefan Monnier
2018-12-07 13:16 ` martin rudalics
2018-12-07 13:26 ` Stefan Monnier
2018-12-07 13:49 ` martin rudalics
2018-12-10 15:07 ` Stefan Monnier
2018-12-07 13:58 ` Eli Zaretskii
2018-12-07 13:22 ` Eli Zaretskii
2018-12-06 18:45 ` martin rudalics
2018-12-06 19:34 ` Angelo Graziosi
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=1266357133.430788.1544118598533@mail.libero.it \
--to=angelo.g0@libero.it \
--cc=eliz@gnu.org \
--cc=emacs-devel@gnu.org \
--cc=hong@topbug.net \
--cc=sebastian_rose@gmx.de \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).