Skip to content

Commit 0234a9f

Browse files
authored
Merge pull request #24 from zkry/make-level-selection-buttons-clickable
make level selection buttons clickable
2 parents 374d970 + 9136d46 commit 0234a9f

File tree

1 file changed

+7
-4
lines changed

1 file changed

+7
-4
lines changed

asm-blox.el

Lines changed: 7 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -3671,10 +3671,13 @@ The following commands are available:
36713671
(let ((saved-file-ids (asm-blox--saved-puzzle-ct-ids name)))
36723672
(dolist (i saved-file-ids)
36733673
(insert
3674-
(propertize (format "[%d]" i)
3675-
'asm-blox-puzzle-selection-id name
3676-
'asm-blox-puzzle-selection-filename
3677-
(asm-blox--make-puzzle-idx-file-name name i)))
3674+
(button-buttonize
3675+
(propertize (format "[%d]" i)
3676+
'asm-blox-puzzle-selection-id name
3677+
'asm-blox-puzzle-selection-filename
3678+
(asm-blox--make-puzzle-idx-file-name name i))
3679+
(lambda (_)
3680+
(asm-blox-select-puzzle))))
36783681
(insert (propertize " " 'asm-blox-puzzle-selection-id name)))))
36793682
(insert "\n")))))
36803683

0 commit comments

Comments
 (0)