branch: elpa/emacsql
commit 8c5dfc39c52131c547270a84bdc399c6b236a94b
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
Do not end errors with periods
---
emacsql-compiler.el | 2 +-
emacsql.el | 2 +-
2 files changed, 2 insertions(+), 2 deletions(-)
diff --git a/emacsql-compiler.el b/emacsql-compiler.el
index d03f4a446b..d20151510e 100644
--- a/emacsql-compiler.el
+++ b/emacsql-compiler.el
@@ -122,7 +122,7 @@
(defun emacsql-escape-vector (vector)
"Encode VECTOR into a SQL vector scalar."
(cl-typecase vector
- (null (emacsql-error "Empty SQL vector expression."))
+ (null (emacsql-error "Empty SQL vector expression"))
(list (mapconcat #'emacsql-escape-vector vector ", "))
(vector (concat "(" (mapconcat #'emacsql-escape-scalar vector ", ") ")"))
(otherwise (emacsql-error "Invalid vector %S" vector))))
diff --git a/emacsql.el b/emacsql.el
index 9e28cfd55f..d345d177ea 100644
--- a/emacsql.el
+++ b/emacsql.el
@@ -307,7 +307,7 @@ Each column must be a plain symbol, no expressions allowed
here."
(cl-assert (eq :select (elt sql 0)))
(let ((vars (elt sql 1)))
(when (eq '* vars)
- (error "Must explicitly list columns in `emacsql-with-bind'."))
+ (error "Must explicitly list columns in `emacsql-with-bind'"))
(cl-assert (cl-every #'symbolp vars))
`(let ((emacsql--results (emacsql ,connection ,sql ,@args))
(emacsql--final nil))
