X-Git-Url: https://git.korewanetadesu.com/?p=pico8.git;a=blobdiff_plain;f=pico8.el;h=bc3ce11d3901c94d8b4fafbb0667c03810cec7a4;hp=543e71b92ccec7ed7d7aa3ce0414b5efe6338eab;hb=60ef55c52f3f238d73da5f8aba60232550405a8a;hpb=fce210261ad1c4ac9de00cb8c872220f27743a23 diff --git a/pico8.el b/pico8.el index 543e71b..bc3ce11 100644 --- a/pico8.el +++ b/pico8.el @@ -3,6 +3,7 @@ ;; Author: Joe Wreschnig ;; Package-Version: 20170620 ;; Package-Requires: ((emacs "25") (polymode "20170307") (lua-mode "20151025")) +;; URL: https://git.korewanetadesu.com/pico8.git ;; Keywords: convenience ;; ;; This program is free software; you can redistribute it and/or @@ -16,7 +17,7 @@ ;; of which is "real Lua" text and the other five of which have ;; diverse strict formatting requirements. ;; -;; It provides the keybinds and commands for inter-mode actions. +;; It provides keybindings and commands for inter-mode actions. ;;; Code: @@ -58,9 +59,10 @@ disabled by setting this to t." (defcustom pico8-lua-indent-level 1 "Default indentation for PICO-8 Lua mode. -This overrides lua-indent-mode in `pico8-lua-mode'. `lua-mode''s -default indentation is 3, which is both idiosyncractic and quite -large when viewed in the PICO-8 editor, where the convetion is 1." +This overrides `lua-indent-level' in `pico8-lua-mode'. +`lua-mode''s default indentation is 3, which is both +idiosyncratic and quite large when viewed in the PICO-8 editor, +where the convention is 1." :group 'pico8 :tag "PICO-8 Lua Indent Level") @@ -309,7 +311,7 @@ to change `pico8-pixel-face'." ("f+" . 'pico8-pixel-f) ;; If the \n isn't in the smaller face the line is taller to - ;; accomodate the full sized point at the end-of-line. + ;; accommodate the full sized point at the end-of-line. ("\n" . 'pico8-pixel-0))) (defun pico8-gfx-current-position () @@ -494,9 +496,6 @@ This function needs a lot of work.." (and (re-search-backward "\\" (- (point) 30) t) (char-after))))) - ;; FIXME: Actually parse something? lua-mode's sexp - ;; commands don't seem too good, and counting parentheses - ;; by hand is for nerds. (cond ((= c ?f) (pico8-goto-flag n)) ((= c ?s) (pico8-goto-sprite n)) (t (error "There's nothing obvious to go to")))))