diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-09 16:15:21 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2022-03-09 16:15:21 -0700 |
| commit | e97a0f3414926d2442e82c8531287e4b6e10ef37 (patch) | |
| tree | 841bfa8937d02f4eca1dae79af69c1ca3d111090 /src/image.lisp | |
| parent | fc08e3fe0697f9347ceea48baf8162b9203dd1dd (diff) | |
| download | consfigurator-e97a0f3414926d2442e82c8531287e4b6e10ef37.tar.gz | |
rename MEMSTRING= -> MEMSTR=
Signed-off-by: Sean Whitton <spwhitton@spwhitton.name>
Diffstat (limited to 'src/image.lisp')
| -rw-r--r-- | src/image.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/image.lisp b/src/image.lisp index d87a80c..b57350d 100644 --- a/src/image.lisp +++ b/src/image.lisp @@ -447,8 +447,7 @@ Called by connection types which start up remote Lisp images." :goal-operation 'asdf:monolithic-compile-bundle-op)) (let ((name (asdf:component-name requirement))) ;; Handle UIOP specially because it comes with ASDF. - (unless - (memstring= (asdf:primary-system-name name) '("asdf" "uiop")) + (unless (memstr= (asdf:primary-system-name name) '("asdf" "uiop")) (pushnew requirement asdf-requirements))))) (nreversef asdf-requirements)) requirements)) |