Fix warning from M-x checkdoc. Add lexical-binding: t.
Fix: Warning: `delete-backward-char' is for interactive use only; use `delete-char' instead.
--- a/contrib/gadict.el Mon Mar 21 23:53:15 2016 +0200
+++ b/contrib/gadict.el Tue Mar 22 00:57:29 2016 +0200
@@ -1,4 +1,4 @@
-;;; gadict-mode.el --- major mode for editing gadict dictionary source files
+;;; gadict-mode.el --- major mode for editing gadict dictionary source files -*- lexical-binding: t -*-
;; Copyright (C) 2016 by Oleksandr Gavenko <gavenkoa@gmail.com>
@@ -63,7 +63,7 @@
(exchange-point-and-mark))
(defun gadict-setup-expansions ()
- "Adds gadict-mode specific expansions."
+ "Add `gadict-mode' specific expansions."
(set (make-local-variable 'er/try-expand-list) (list #'gadict-mark-article)))
(eval-when-compile
@@ -99,7 +99,7 @@
(beginning-of-line)
(goto-char (point-max)))
(while (eq (char-before) ?\n)
- (delete-backward-char 1))
+ (delete-char -1))
(insert-char ?\n)
(insert-char ?_ 2)
(insert-char ?\n 3)
@@ -130,3 +130,7 @@
(provide 'gadict)
;;; dict-mode.el ends here
+
+(provide 'gadict)
+
+;;; gadict.el ends here