godotengine/emacs-gdscript-mode
1
0
Fork 0
mirror of https://github.com/godotengine/emacs-gdscript-mode.git synced 2026-01-05 22:10:05 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fix more melpazoid warnings

Browse Source 
Remove FSF from copyright lines
Address warnings in gdscript-indent-and-nav.el
This commit is contained in:
Nathan Lovato
2020-03-22 13:35:18 -06:00
parent 40d08c3b02
commit 6997f4ddd3
9 changed files with 18 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
gdscript-completion.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-completion.el --- Autocompletion for GDScript -*- lexical-binding: t -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-customization.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-customization.el --- Customizable variables for the GDScript language support -*- lexical-binding: t -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-fill-paragraph.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-fill-paragraph.el --- GDScript fill paragraph functions -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-imenu.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-imenu.el --- Imenu support for GDScript -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

24
gdscript-indent-and-nav.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-indent-and-nav.el --- Syntax highlighting for GDScript -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/
@@ -39,9 +39,13 @@
(require 'gdscript-syntax)
(require 'cl-lib)
;;; Indentation
(defvar gdscript-nav-beginning-of-defun-regexp
(gdscript-rx line-start (* space) defun (+ space) (group symbol-name))
"Regexp matching class or function definition.
The name of the defun should be grouped so it can be retrieved
via `match-string'.")
;;; Indentation
(defun gdscript-indent-guess-indent-offset ()
"Guess and set `gdscript-indent-offset' for the current buffer."
(interactive)
@@ -203,7 +207,7 @@ keyword
(skip-syntax-forward " ")
(point))))))))
;; After backslash.
((let ((start (when (not (gdscript-syntax-comment-or-string-p ppss))
((let ((start (unless (gdscript-syntax-comment-or-string-p ppss)
(gdscript-info-line-ends-backslash-p
(1- (line-number-at-pos))))))
(when start
@@ -552,9 +556,7 @@ the line will be re-indented automatically if needed."
;; Reindent region if this is a multiline statement
(gdscript-indent-region start end))))))))))
;;; Misc helpers
(defun gdscript-info-current-defun (&optional include-type)
"Return name of surrounding function with Gdscript compatible dotty syntax.
Optional argument INCLUDE-TYPE indicates to include the type of the defun.
@@ -615,7 +617,7 @@ since it returns nil if point is not inside a defun."
(and (= (current-indentation) 0) (throw 'exit t))))
(and names
(concat (and type (format "%s " type))
(mapconcat 'identity names ".")))))))
(mapconcat #'identity names ".")))))))
(defun gdscript-info-current-symbol (&optional replace-self)
"Return current symbol using dotty syntax.
@@ -895,12 +897,6 @@ operator."
;;; Navigation
(defvar gdscript-nav-beginning-of-defun-regexp
(gdscript-rx line-start (* space) defun (+ space) (group symbol-name))
"Regexp matching class or function definition.
The name of the defun should be grouped so it can be retrieved
via `match-string'.")
(defun gdscript-nav--beginning-of-defun (&optional arg)
"Internal implementation of `gdscript-nav-beginning-of-defun'.
With positive ARG search backwards, else search forwards."
@@ -1005,7 +1001,7 @@ be skipped."
(throw 'found (point-marker)))
((and newpos context)
(setq prev-pos (point)))
(t (when (not newpos) (goto-char start-pos))
(t (unless newpos (goto-char start-pos))
(throw 'found nil))))))))
(defun gdscript-nav--forward-defun (arg)

2
gdscript-mode.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-mode.el --- Major mode for Godot's GDScript language -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-rx.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-rx.el --- Regex for GDScript -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-syntax.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-syntax.el --- Syntax highlighting for GDScript -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/

2
gdscript-utils.el
View File

@@ -1,6 +1,6 @@
;;; gdscript-utils.el --- Utility functions for gdscript-mode -*- lexical-binding: t; -*-
;; Copyright (C) 2020 GDQuest, Free Software Foundation, Inc.
;; Copyright (C) 2020 GDQuest
;; Author: Nathan Lovato <nathan@gdquest.com>, Fabián E. Gallina <fgallina@gnu.org>
;; URL: https://github.com/GDQuest/emacs-gdscript-mode/