[nongnu] elpa/with-simulated-input 93e55eddee 053/134: Fix linter issues and remove unused dependencies

[ELPA Syncer]

branch: elpa/with-simulated-input
commit 93e55eddeeb84dd30aeda4cbd2f9c6387ca0483a
Author: Ryan C. Thompson <rct@thompsonclan.org>
Commit: Ryan C. Thompson <rct@thompsonclan.org>

    Fix linter issues and remove unused dependencies
---
 Eldev                   |  3 +++
 with-simulated-input.el | 18 ++++++++++--------
 2 files changed, 13 insertions(+), 8 deletions(-)

diff --git a/Eldev b/Eldev
index 2518938700..3270d1c696 100644
--- a/Eldev
+++ b/Eldev
@@ -7,3 +7,6 @@
 (eldev-use-package-archive 'melpa-stable)
 
 (eldev-add-extra-dependencies 'test 'undercover)
+
+;; Tell checkdoc not to demand two spaces after a period.
+(setq sentence-end-double-space nil)
diff --git a/with-simulated-input.el b/with-simulated-input.el
index 7b44783bf3..0f344f1675 100644
--- a/with-simulated-input.el
+++ b/with-simulated-input.el
@@ -6,8 +6,8 @@
 ;; Author: Ryan C. Thompson
 ;; Created: Thu Jul 20 11:56:23 2017 (-0700)
 ;; Version: 2.4
-;; Package-Requires: ((emacs "24.4") (seq "2.0") (s "0"))
-;; URL:
+;; Package-Requires: ((emacs "24.4"))
+;; URL: https://github.com/DarwinAwardWinner/with-simulated-input
 ;; Keywords: lisp, tools, extensions
 
 ;; This file is NOT part of GNU Emacs.
@@ -43,8 +43,6 @@
 ;;; Code:
 
 (require 'cl-lib)
-(require 'seq)
-(require 's)
 
 (cl-defun wsi-key-bound-p (key)
   "Return non-nil if KEY is bound in any keymap.
@@ -106,7 +104,7 @@ to check.
 
 If `lexical-binding' is not enabled, return nil.
 
-This macro expands to a lisp form that evaluates to the current
+This macro expands to a Lisp form that evaluates to the current
 lexical environment. It works by creating a closure and then
 extracting and returning its lexical environment.
 
@@ -117,6 +115,10 @@ environment."
        (cadr temp-closure))))
 
 (defun wsi-make-closure (expr env)
+  "Construct a closure from EXPR and ENV.
+
+Returns a zero-argument function that, when called, evaluates
+EXPR in lexical environment ENV and returns the result."
   (if env
       `(closure ,env () ,expr)
     `(lambda () ,expr)))
@@ -141,7 +143,7 @@ like `\"hello RET\"'. Note that spaced must be indicated
 explicitly using `SPC', e.g. `\"hello SPC world RET\"'.
 
 KEYS can also be a list. In this case, each element should either
-be a key sequence as described above or an arbitrary lisp form
+be a key sequence as described above or an arbitrary Lisp form
 that will be evaluated at that point in the input sequence. For
 example, `\"hello RET\"' could also be written as:
 
@@ -152,7 +154,7 @@ error is signalled. This is to ensure that BODY will never 
block
 waiting for input, since this macro is intended for
 non-interactive use. If BODY does not consume all the input
 events in KEYS, the remaining input events in KEYS are discarded,
-and any remaining lisp forms in KEYS are never evaluated.
+and any remaining Lisp forms in KEYS are never evaluated.
 
 Any errors generated by any means during the evaluation of BODY
 are propagated normally.
@@ -233,7 +235,7 @@ in `progn'."
                (if action-closures
                    (let ((next-action (pop action-closures)))
                      (funcall next-action))
-                 (error "`with-simulated-input' reached end of action list 
without returning."))
+                 (error "`with-simulated-input' reached end of action list 
without returning"))
              (error (throw 'wsi-threw-error err)))))
         ;; Set up the temporary keymap
         (action-map (make-sparse-keymap)))