branch: elpa/moe-theme
commit f2c550155d8d44627a5e4b5c7a1f144b4c73cf80
Author: onohiroko <[email protected]>
Commit: onohiroko <[email protected]>
Fix explosion in Emacs 26.1
---
moe-theme.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/moe-theme.el b/moe-theme.el
index 5d1d8cdb86..879de5c03b 100644
--- a/moe-theme.el
+++ b/moe-theme.el
@@ -393,8 +393,8 @@ as long as setq `moe-theme-mode-line-color' first."
(name (progn (string-match "#<frame \\(.+?\\) 0x[0-9a-f]+>"
obj-name)
(match-string-no-properties 1 obj-name)))
(int (if (string-match "F\\([0-9]+\\)" name)
- (1- (string-to-int (match-string-no-properties 1 name)))
- (string-to-int (substring (md5 name) 0 1) 16)))
+ (1- (string-to-number (match-string-no-properties 1 name)))
+ (string-to-number (substring (md5 name) 0 1) 16)))
(enabled-colors-len (length
moe-theme-colorize-modeline-by-frame-id-color-set)))
(nth (% int enabled-colors-len)
moe-theme-colorize-modeline-by-frame-id-color-set)))
