conn
(setf last-error error)
(cond
- (;; A remote response whose request has been cancelled
+ (;; A remote response whose request has been canceled
;; (i.e. timeout or C-g)
;;
(and response-p (null cont))
(jsonrpc--event
conn 'internal
:log-text
- (format "Response to request %s which has been cancelled"
+ (format "Response to request %s which has been canceled"
id)
:id id)
;; TODO: food for thought: this seems to be also where
(funcall success-fn result)))
(t
;; For clarity. This happens if the `jsonrpc-request' was
- ;; cancelled
+ ;; canceled
))))
(cl-defun jsonrpc--async-request-1 (connection
("C/C++ files (%d)" ,(rx nonl "."
(or "c" "cc" "cpp" "h" "hpp" "cxx" "hxx")
eos))
- ("Python files (%d" ,(rx nonl ".py" eos))
+ ("Python files (%d)" ,(rx nonl ".py" eos))
("Java files (%d)" ,(rx nonl ".java" eos))
)
"List of rules used by `recentf-arrange-by-rule' to build sub-menus.
;; Spreadsheet size adjustments
;;----------------------------------------------------------------------------
(defun ses--blank-line-needs-printing-p ()
- "Returns `t' when blank new line print-out needs to be initialised
+ "Returns `t' when blank new line print-out needs to be initialized
by calling the printers on it, `nil' otherwise."
(let (ret
printer