* bug#15918: 24.3; package-delete backtrace
@ 2013-11-18 5:07 Dave Abrahams
2021-01-20 2:36 ` Lars Ingebrigtsen
0 siblings, 1 reply; 4+ messages in thread
From: Dave Abrahams @ 2013-11-18 5:07 UTC (permalink / raw)
To: 15918
I installed use-package from melpa. It was upgraded recently, so
`M-x list-packages'
`U x y e s RET ~ x y e s RET'
I don't know how to reproduce this from emacs -Q, unfortunately. It
looks like the package in question ("use-package") no longer has a
directory in ~/.emacs.d/elpa. I only have the newer
use-package-20131105.1032. I'm not sure why the package manager still
thinks it's installed.
--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
file-name-directory(nil)
(string-equal (file-name-directory dir) (file-name-as-directory (expand-file-name package-user-dir)))
(if (string-equal (file-name-directory dir) (file-name-as-directory (expand-file-name package-user-dir))) (progn (delete-directory dir t t) (message "Package `%s-%s' deleted." name version)) (error "Package `%s-%s' is a system package, not deleting" name version))
(let ((dir (package--dir name version))) (if (string-equal (file-name-directory dir) (file-name-as-directory (expand-file-name package-user-dir))) (progn (delete-directory dir t t) (message "Package `%s-%s' deleted." name version)) (error "Package `%s-%s' is a system package, not deleting" name version)))
package-delete("use-package" "20131026.11")
(lambda nil (package-delete (car elt) (cdr elt)))()
funcall((lambda nil (package-delete (car elt) (cdr elt))))
(if debug-on-error (funcall body) (condition-case err (funcall body) (error (message (cadr err)))))
(let ((body (function (lambda nil (package-delete (car elt) (cdr elt)))))) (if debug-on-error (funcall body) (condition-case err (funcall body) (error (message (cadr err))))))
(while --dolist-tail-- (setq elt (car --dolist-tail--)) (let ((body (function (lambda nil (package-delete (car elt) (cdr elt)))))) (if debug-on-error (funcall body) (condition-case err (funcall body) (error (message (cadr err)))))) (setq --dolist-tail-- (cdr --dolist-tail--)))
(let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--)) (let ((body (function (lambda nil (package-delete ... ...))))) (if debug-on-error (funcall body) (condition-case err (funcall body) (error (message (cadr err)))))) (setq --dolist-tail-- (cdr --dolist-tail--))))
(progn (let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--)) (let ((body (function (lambda nil ...)))) (if debug-on-error (funcall body) (condition-case err (funcall body) (error (message ...))))) (setq --dolist-tail-- (cdr --dolist-tail--)))))
(if (yes-or-no-p (if (= (length delete-list) 1) (format "Delete package `%s-%s'? " (caar delete-list) (cdr (car delete-list))) (format "Delete these %d packages (%s)? " (length delete-list) (mapconcat (function (lambda (elt) (concat ... "-" ...))) delete-list ", ")))) (progn (let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--)) (let ((body (function ...))) (if debug-on-error (funcall body) (condition-case err (funcall body) (error ...)))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (error "Aborted"))
(progn (if (yes-or-no-p (if (= (length delete-list) 1) (format "Delete package `%s-%s'? " (caar delete-list) (cdr (car delete-list))) (format "Delete these %d packages (%s)? " (length delete-list) (mapconcat (function (lambda ... ...)) delete-list ", ")))) (progn (let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--)) (let ((body ...)) (if debug-on-error (funcall body) (condition-case err ... ...))) (setq --dolist-tail-- (cdr --dolist-tail--))))) (error "Aborted")))
(if delete-list (progn (if (yes-or-no-p (if (= (length delete-list) 1) (format "Delete package `%s-%s'? " (caar delete-list) (cdr (car delete-list))) (format "Delete these %d packages (%s)? " (length delete-list) (mapconcat (function ...) delete-list ", ")))) (progn (let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt (car --dolist-tail--)) (let (...) (if debug-on-error ... ...)) (setq --dolist-tail-- (cdr --dolist-tail--))))) (error "Aborted"))))
(let (install-list delete-list cmd id) (save-excursion (goto-char (point-min)) (while (not (eobp)) (setq cmd (char-after)) (if (eq cmd 32) nil (setq id (tabulated-list-get-id)) (cond ((eq cmd 68) (setq delete-list (cons ... delete-list))) ((eq cmd 73) (setq install-list (cons ... install-list))))) (forward-line))) (if install-list (progn (if (yes-or-no-p (if (= (length install-list) 1) (format "Install package `%s'? " (car install-list)) (format "Install these %d packages (%s)? " (length install-list) (mapconcat ... install-list ", ")))) (mapc (quote package-install) install-list)))) (if delete-list (progn (if (yes-or-no-p (if (= (length delete-list) 1) (format "Delete package `%s-%s'? " (caar delete-list) (cdr ...)) (format "Delete these %d packages (%s)? " (length delete-list) (mapconcat ... delete-list ", ")))) (progn (let ((--dolist-tail-- delete-list) elt) (while --dolist-tail-- (setq elt ...) (let ... ...) (setq --dolist-tail-- ...)))) (error "Aborted")))) (and delete-list (null install-list) (package-initialize)) (if (or delete-list install-list) (package-menu--generate t t) (message "No operations specified.")))
package-menu-execute()
call-interactively(package-menu-execute nil nil)
--8<---------------cut here---------------end--------------->8---
In GNU Emacs 24.3.1 (x86_64-apple-darwin11.4.2, Carbon Version 1.6.0 AppKit 1138.51)
of 2013-09-24 on Yukikaze.local
Windowing system distributor `Apple Inc.', version 10.9.0
Configured using:
`configure '--with-mac'
'--enable-mac-app=/Users/xin/Documents/emacs-mac-port/build'
'--prefix=/Users/xin/Documents/emacs-mac-port/build''
Important settings:
locale-coding-system: utf-8-unix
default enable-multibyte-characters: t
Major mode: Debugger
Minor modes in effect:
diff-auto-refine-mode: t
shell-dirtrack-mode: t
me-minor-mode: t
delete-selection-mode: t
override-global-mode: t
tooltip-mode: t
mac-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
auto-composition-mode: t
auto-encryption-mode: t
auto-compression-mode: t
buffer-read-only: t
line-number-mode: t
transient-mark-mode: t
Recent input:
r e p o r t - e m a c s - b u g ) ) C-x C-e C-, M-x
r e p o r t <tab> m a <tab> <return> C-g C-e C-n C-a
<tab> C-n C-a <tab> C-p C-e C-, C-, C-b <M-backspace>
<backspace> C-e C-n C-n C-a <tab> C-n C-a <tab> C-e
C-, C-, C-, C-. C-. C-. C-, m a c - C-e C-p C-p C-p
C-p C-e <return> C-n C-e C-n C-n C-p C-n C-n C-e )
C-x C-e C-p C-p C-p C-p C-p C-p C-p C-p C-s f e a t
C-, ( C-e ) C-n C-n C-n C-n C-n C-p C-p C-p C-p C-p
C-a C-n C-SPC C-n C-n C-n C-n C-n C-n C-M-\ C-p C-e
C-x C-e M-x r e p l <backspace> o r t - e m <tab> b
u <tab> <return> C-g C-x b * D e <tab> C-g C-g C-x
b * B a <tab> <return> C-SPC C-p C-p C-p C-g C-p C-.
<return> M-x e v a l - b u f f e r C-g <C-return> q
<C-return> M-x e v a l - b u f f e r <return> C-x b
* p a c <tab> C-g M-x p a c k a g e - l i s t <tab>
<return> M-> ~ x y e s <return> C-p C-SPC C-g M-x r
e p o r t - e m <tab> b u g C-g <C-return> <C-return>
M-" M-: d i r <return> M-: p a c k a g e C-g C-SPC
C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n C-n
C-n C-n C-n C-n C-n C-n M-w M-x r e p o r t - u <backspace>
e m a <tab> b <tab> <return>
Recent messages:
Contacting host: melpa.milkbox.net:80
Saving file /Users/dave/.emacs.d/elpa/archives/melpa/archive-contents...
Wrote /Users/dave/.emacs.d/elpa/archives/melpa/archive-contents
Mark set
Entering debugger...
Mark set
Quit [2 times]
nil
Quit
Mark activated
Load-path shadows:
/usr/local/share/emacs/site-lisp/trampver hides /Applications/Emacs.app/Contents/Resources/lisp/net/trampver
/usr/local/share/emacs/site-lisp/tramp hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp
/usr/local/share/emacs/site-lisp/tramp-uu hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-uu
/usr/local/share/emacs/site-lisp/tramp-smb hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-smb
/usr/local/share/emacs/site-lisp/tramp-sh hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-sh
/usr/local/share/emacs/site-lisp/tramp-loaddefs hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-loaddefs
/usr/local/share/emacs/site-lisp/tramp-gw hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-gw
/usr/local/share/emacs/site-lisp/tramp-ftp hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-ftp
/usr/local/share/emacs/site-lisp/tramp-compat hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-compat
/usr/local/share/emacs/site-lisp/tramp-cmds hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-cmds
/usr/local/share/emacs/site-lisp/tramp-cache hides /Applications/Emacs.app/Contents/Resources/lisp/net/tramp-cache
Features:
(emacsbug two-column iso-transl lisp-mnt iswitchb ido esh-var esh-io
esh-cmd esh-opt esh-ext esh-proc esh-arg eldoc esh-groups eshell
esh-module esh-mode esh-util ediff-merg ediff-diff ediff-wind ediff-help
ediff-util ediff-mult ediff-init ediff dired-x tar-mode find-lisp
autoload network-stream starttls url-http tls url-gw url-cache url-auth
url url-proxy url-privacy url-expand url-methods url-history url-cookie
url-domsuf url-util url-parse url-vars qp mail-extr sort mailcap shadow
message sendmail rfc822 mml mml-sec mm-decode mm-bodies mm-encode
mail-parse rfc2231 rfc2047 rfc2045 ietf-drums mailabbrev gmm-utils
mailheader sh-script smie executable reporter elp tramp-cmds tramp-cache
tramp-sh tramp tramp-compat auth-source eieio password-cache
tramp-loaddefs trampver dabbrev pp mule-util magit-log-edit log-edit
pcvs-util add-log magit-bisect magit-key-mode magit epa derived epg
epg-config git-rebase-mode server rx tabify man whitespace diff-mode
diff goto-addr view debug org-wl org-w3m org-vm org-rmail org-mhe
org-mew org-irc org-jsinfo org-infojs org-html org-exp ob-exp
org-exp-blocks org-agenda org-info org-gnus org-docview org-bibtex
bibtex org-bbdb org ob-tangle ob-ref ob-lob ob-table org-footnote
org-src ob-comint ob-keys org-pcomplete org-list org-faces org-entities
noutline outline org-version ob-emacs-lisp ob org-compat org-macs
ob-eval org-loaddefs format-spec cal-menu calendar cal-loaddefs
find-dired grep compile dired-aux help-mode shell pcomplete comint
ansi-color ring vc-git misearch multi-isearch thingatpt dired jka-compr
melpa use-package diminish initsplit cl-macs gv cus-edit find-func cl
gnus gnus-ems nnheader gnus-util mail-utils mm-util mail-prsvr wid-edit
delsel cus-start cus-load elhome edmacro kmacro bind-key easy-mmode
elhome-autoloads initsplit-autoloads magit-filenotify-autoloads
magit-log-edit-autoloads magit-svn-autoloads magit-autoloads info
easymenu git-rebase-mode-autoloads git-commit-mode-autoloads finder-inf
melpa-autoloads byte-opt warnings bytecomp byte-compile cconv advice
help-fns cl-lib advice-preload use-package-autoloads diminish-autoloads
bind-key-autoloads package time-date tooltip ediff-hook vc-hooks
lisp-float-type mwheel mac-win tool-bar dnd fontset image regexp-opt
fringe tabulated-list newcomment lisp-mode register page menu-bar
rfn-eshadow timer select scroll-bar mouse jit-lock font-lock syntax
facemenu font-core frame cham georgian utf-8-lang misc-lang vietnamese
tibetan thai tai-viet lao korean japanese hebrew greek romanian slovak
czech european ethiopic indian cyrillic chinese case-table epa-hook
jka-cmpr-hook help simple abbrev minibuffer loaddefs button faces
cus-face macroexp files text-properties overlay sha1 md5 base64 format
env code-pages mule custom widget hashtable-print-readable backquote
multi-tty make-network-process emacs)
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#15918: 24.3; package-delete backtrace
2013-11-18 5:07 bug#15918: 24.3; package-delete backtrace Dave Abrahams
@ 2021-01-20 2:36 ` Lars Ingebrigtsen
2021-01-20 17:29 ` Dave Abrahams
0 siblings, 1 reply; 4+ messages in thread
From: Lars Ingebrigtsen @ 2021-01-20 2:36 UTC (permalink / raw)
To: Dave Abrahams; +Cc: 15918
Dave Abrahams <dave@boostpro.com> writes:
> I installed use-package from melpa. It was upgraded recently, so
>
> `M-x list-packages'
> `U x y e s RET ~ x y e s RET'
>
> I don't know how to reproduce this from emacs -Q, unfortunately. It
> looks like the package in question ("use-package") no longer has a
> directory in ~/.emacs.d/elpa. I only have the newer
> use-package-20131105.1032. I'm not sure why the package manager still
> thinks it's installed.
>
> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
> file-name-directory(nil)
(I'm going through old bug reports that unfortunately got no response at
the time.)
Are you still seeing this issue in newer Emacs versions?
--
(domestic pets only, the antidote for overdose, milk.)
bloggy blog: http://lars.ingebrigtsen.no
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#15918: 24.3; package-delete backtrace
2021-01-20 2:36 ` Lars Ingebrigtsen
@ 2021-01-20 17:29 ` Dave Abrahams
2021-01-20 17:33 ` Lars Ingebrigtsen
0 siblings, 1 reply; 4+ messages in thread
From: Dave Abrahams @ 2021-01-20 17:29 UTC (permalink / raw)
To: Lars Ingebrigtsen; +Cc: 15918
Thanks, I haven’t seen this in years.
> On Jan 19, 2021, at 6:36 PM, Lars Ingebrigtsen <larsi@gnus.org> wrote:
>
> Dave Abrahams <dave@boostpro.com> writes:
>
>> I installed use-package from melpa. It was upgraded recently, so
>>
>> `M-x list-packages'
>> `U x y e s RET ~ x y e s RET'
>>
>> I don't know how to reproduce this from emacs -Q, unfortunately. It
>> looks like the package in question ("use-package") no longer has a
>> directory in ~/.emacs.d/elpa. I only have the newer
>> use-package-20131105.1032. I'm not sure why the package manager still
>> thinks it's installed.
>>
>> Debugger entered--Lisp error: (wrong-type-argument stringp nil)
>> file-name-directory(nil)
>
> (I'm going through old bug reports that unfortunately got no response at
> the time.)
>
> Are you still seeing this issue in newer Emacs versions?
>
> --
> (domestic pets only, the antidote for overdose, milk.)
> bloggy blog: https://www.google.com/url?q=http://lars.ingebrigtsen.no&source=gmail-imap&ust=1611715014000000&usg=AOvVaw0XzRFOGRLqLbI8sbnk2XHo
^ permalink raw reply [flat|nested] 4+ messages in thread
* bug#15918: 24.3; package-delete backtrace
2021-01-20 17:29 ` Dave Abrahams
@ 2021-01-20 17:33 ` Lars Ingebrigtsen
0 siblings, 0 replies; 4+ messages in thread
From: Lars Ingebrigtsen @ 2021-01-20 17:33 UTC (permalink / raw)
To: Dave Abrahams; +Cc: 15918
Dave Abrahams <dave@boostpro.com> writes:
> Thanks, I haven’t seen this in years.
Thanks; closing this bug report, then.
--
(domestic pets only, the antidote for overdose, milk.)
bloggy blog: http://lars.ingebrigtsen.no
^ permalink raw reply [flat|nested] 4+ messages in thread
end of thread, other threads:[~2021-01-20 17:33 UTC | newest]
Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-11-18 5:07 bug#15918: 24.3; package-delete backtrace Dave Abrahams
2021-01-20 2:36 ` Lars Ingebrigtsen
2021-01-20 17:29 ` Dave Abrahams
2021-01-20 17:33 ` Lars Ingebrigtsen
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.