[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/slime 7e08d61fad 31/43: swank-asdf: Fix slime-load-system
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/slime 7e08d61fad 31/43: swank-asdf: Fix slime-load-system for systems with dots in the name |
Date: |
Thu, 28 Dec 2023 22:00:30 -0500 (EST) |
branch: elpa/slime
commit 7e08d61fad0d7a69829ba41eeddbb6b16dc8ecac
Author: Kasper Gałkowski <k@galkowski.xyz>
Commit: Luís Oliveira <luismbo@gmail.com>
swank-asdf: Fix slime-load-system for systems with dots in the name
---
contrib/swank-asdf.lisp | 37 +++++++++++++++++++------------------
1 file changed, 19 insertions(+), 18 deletions(-)
diff --git a/contrib/swank-asdf.lisp b/contrib/swank-asdf.lisp
index 6e3f755258..413160218c 100644
--- a/contrib/swank-asdf.lisp
+++ b/contrib/swank-asdf.lisp
@@ -386,24 +386,25 @@ Example:
"Returns a list of all systems in ASDF's central registry
AND in its source-registry. (legacy name)"
(unique-string-list
- (mapcar
- #'pathname-name
- (while-collecting (c)
- (loop for dir in asdf:*central-registry*
- for defaults = (eval dir)
- when defaults
- do (collect-asds-in-directory defaults #'c))
- (asdf:ensure-source-registry)
- (if (or #+asdf3 t
- #-asdf3 (asdf:version-satisfies (asdf:asdf-version) "2.15"))
- (loop :for k :being :the :hash-keys :of asdf::*source-registry*
- :do (c k))
- #-asdf3
- (dolist (entry (asdf::flatten-source-registry))
- (destructuring-bind (directory &key recurse exclude) entry
- (register-asd-directory
- directory
- :recurse recurse :exclude exclude :collect #'c))))))))
+ (while-collecting (c)
+ (loop for dir in asdf:*central-registry*
+ for defaults = (eval dir)
+ when defaults
+ do (collect-asds-in-directory
+ defaults
+ (lambda (pathname)
+ (c (pathname-name pathname)))))
+ (asdf:ensure-source-registry)
+ (if (or #+asdf3 t
+ #-asdf3 (asdf:version-satisfies (asdf:asdf-version) "2.15"))
+ (loop :for k :being :the :hash-keys :of asdf::*source-registry*
+ :do (c k))
+ #-asdf3
+ (dolist (entry (asdf::flatten-source-registry))
+ (destructuring-bind (directory &key recurse exclude) entry
+ (register-asd-directory
+ directory
+ :recurse recurse :exclude exclude :collect #'c)))))))
(defslimefun list-all-systems-known-to-asdf ()
"Returns a list of all systems ASDF knows already."
- [nongnu] elpa/slime a02742211e 41/43: Fix apropos-mode., (continued)
- [nongnu] elpa/slime a02742211e 41/43: Fix apropos-mode., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 28adf1dca0 43/43: Merge commit 'a4f3471487db48f7289dc0ea019611d093e5ee7f' into elpa--merge/slime, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 3b9713f207 05/43: swank.asd: Do not reload SWANK., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 65b781d9c7 19/43: swank-arglists: Silence the SBCL inlining warning., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 8da60ff543 08/43: abcl: fix warning about ignored slot, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 2080537746 04/43: Require `xref` as regular dependancy, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime a4f3471487 42/43: 2.2.8, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 1ee576a53f 40/43: slime: slime-print-apropos use buttons for dispay, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 3837255e0c 17/43: sbcl: Use file-write-date instead of debug-source-created, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime c5342a3086 14/43: Properly comment out multiline error messages during printout, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 7e08d61fad 31/43: swank-asdf: Fix slime-load-system for systems with dots in the name,
ELPA Syncer <=
- [nongnu] elpa/slime 4d540c8fc9 38/43: slime-cl-indent: fix lambda list indentation for single arg keywords, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime def8408e12 29/43: sexp-ref: accept dotted lists., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 9d3d303333 24/43: clasp: Translate logical pathnames in source references, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 485aa0ca17 16/43: extract-package, readtable-for-package: Use default readtable, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 34b7e43530 09/43: abcl: implement inspection of locals in interpreted frames, ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 6ef28864d4 13/43: Handle null characters correctly in the Allegro backend., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 649abf2c19 23/43: compute-enriched-decoded-arglist sb-assem:inst: catch NIL., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 0a77a989fd 20/43: Fix extract-local-op-arglists for labels., ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 1f9a95f3a0 18/43: Revert "sbcl: Use file-write-date instead of debug-source-created", ELPA Syncer, 2023/12/28
- [nongnu] elpa/slime 32f5652d6a 15/43: sbcl: Improve inspection of functions and code components., ELPA Syncer, 2023/12/28