summaryrefslogtreecommitdiff
path: root/kasi-totp.el
diff options
context:
space:
mode:
Diffstat (limited to 'kasi-totp.el')
-rw-r--r--kasi-totp.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/kasi-totp.el b/kasi-totp.el
index b0f9a5f..f22c30c 100644
--- a/kasi-totp.el
+++ b/kasi-totp.el
@@ -81,7 +81,7 @@ string."
81 81
82This is not a 100% faithful implementation of RFC 4648. The 82This is not a 100% faithful implementation of RFC 4648. The
83concept of encoding partial quanta is not implemented fully." 83concept of encoding partial quanta is not implemented fully."
84 (unless (mod (length string) 8) 84 (unless (zerop (mod (length string) 8))
85 (error "Padding is incorrect")) 85 (error "Padding is incorrect"))
86 (setq string (upcase string)) 86 (setq string (upcase string))
87 (let* ((trimmed-array (append (string-trim-right string "=+") nil)) 87 (let* ((trimmed-array (append (string-trim-right string "=+") nil))