File tree Expand file tree Collapse file tree 1 file changed +13
-11
lines changed Expand file tree Collapse file tree 1 file changed +13
-11
lines changed Original file line number Diff line number Diff line change 263
263
(if firstp
264
264
(progn (setq firstp nil ) (insert " " ))
265
265
(insert " \n " ))
266
- (if-let (details (gethash (car (split-string name))
267
- racket--package-installed+catalog))
268
- (insert (propertize name
269
- 'button '(t )
270
- 'category 'default-button
271
- 'follow-link t
272
- 'action #'describe-racket-package
273
- 'racket-package-details details))
274
- (insert name))))
266
+ (let ((details (gethash (car (split-string name))
267
+ racket--package-installed+catalog)))
268
+ (if details
269
+ (insert (propertize name
270
+ 'button '(t )
271
+ 'category 'default-button
272
+ 'follow-link t
273
+ 'action #'describe-racket-package
274
+ 'racket-package-details details))
275
+ (insert name)))))
275
276
(newline ))
276
277
(:source
277
278
(insert " " )
305
306
; ; detail buffer.
306
307
(delete-region (point-min ) end-details)
307
308
(goto-char (point-min ))
308
- (when-let (details (gethash id racket--package-installed+catalog))
309
- (racket--package-insert-details details))
309
+ (let ((details (gethash id racket--package-installed+catalog)))
310
+ (when details
311
+ (racket--package-insert-details details)))
310
312
(goto-char (point-min )))))
311
313
312
314
(defun racket--package-linkify-source (str )
You can’t perform that action at this time.
0 commit comments