GNU bug report logs - #15918
24.3; package-delete backtrace

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 15918 in the body.
You can then email your comments to 15918 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Dave Abrahams <dave <at> boostpro.com>
To: bug-gnu-emacs <at> gnu.org
Subject: 24.3; package-delete backtrace
Date: Sun, 17 Nov 2013 21:07:51 -0800

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)

Message #8 received at 15918 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Dave Abrahams <dave <at> boostpro.com>
Cc: 15918 <at> debbugs.gnu.org
Subject: Re: bug#15918: 24.3; package-delete backtrace
Date: Wed, 20 Jan 2021 03:36:47 +0100

Dave Abrahams <dave <at> 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

Message #13 received at 15918 <at> debbugs.gnu.org (full text, mbox):

From: Dave Abrahams <dave <at> boostpro.com>
To: Lars Ingebrigtsen <larsi <at> gnus.org>
Cc: 15918 <at> debbugs.gnu.org
Subject: Re: bug#15918: 24.3; package-delete backtrace
Date: Wed, 20 Jan 2021 09:29:41 -0800

Thanks, I haven’t seen this in years.

> On Jan 19, 2021, at 6:36 PM, Lars Ingebrigtsen <larsi <at> gnus.org> wrote:
> 
> Dave Abrahams <dave <at> 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

Message #16 received at 15918 <at> debbugs.gnu.org (full text, mbox):

From: Lars Ingebrigtsen <larsi <at> gnus.org>
To: Dave Abrahams <dave <at> boostpro.com>
Cc: 15918 <at> debbugs.gnu.org
Subject: Re: bug#15918: 24.3; package-delete backtrace
Date: Wed, 20 Jan 2021 18:33:34 +0100

Dave Abrahams <dave <at> 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

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.