X-Git-Url: https://git.korewanetadesu.com/?p=pico8.git;a=blobdiff_plain;f=pico8.el;h=32239f596b90190d7a926f68a83f6e97032c7ef3;hp=bc3ce11d3901c94d8b4fafbb0667c03810cec7a4;hb=9ecff5fb488d4a68283b1d70bf34547574ae7a0f;hpb=60ef55c52f3f238d73da5f8aba60232550405a8a diff --git a/pico8.el b/pico8.el index bc3ce11..32239f5 100644 --- a/pico8.el +++ b/pico8.el @@ -454,9 +454,8 @@ this is the numeric literal in the code." (let ((beg (- (point) (% (min 255 (current-column)) 2)))) (string-to-number (buffer-substring beg (+ beg 2)) 16))) - ;; In Lua or other code, the sprite is a numeric literal. - ;; lua-mode doesn't derive from anything. - ((or (derived-mode-p 'lua-mode) (derived-mode-p 'prog-mode)) + ;; In Lua, the sprite is a numeric literal. + ((derived-mode-p 'lua-mode) (pico8--string-to-number (or (word-at-point) ""))) (t nil)))