108 |
(not |
(not |
109 |
(let ((name (package-name p))) |
(let ((name (package-name p))) |
110 |
(and (stringp name) |
(and (stringp name) |
111 |
(eq (find-package name) p))))) |
(eqt (find-package name) p))))) |
112 |
0) |
0) |
113 |
|
|
114 |
;; package-name applied to a package's name |
;; package-name applied to a package's name |
183 |
for nk in (package-nicknames p) count |
for nk in (package-nicknames p) count |
184 |
(not |
(not |
185 |
(and (stringp nk) |
(and (stringp nk) |
186 |
(eq p (find-package nk)))))) |
(eqt p (find-package nk)))))) |
187 |
0) |
0) |