projects
/
riece
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
* riece-channel.el: Require 'riece-cache.
[riece]
/
lisp
/
riece-user.el
diff --git
a/lisp/riece-user.el
b/lisp/riece-user.el
index
3af38da
..
8f50548
100644
(file)
--- a/
lisp/riece-user.el
+++ b/
lisp/riece-user.el
@@
-67,7
+67,9
@@
away status, respectively."
(let ((symbol (intern-soft (riece-identity-canonicalize-prefix name)
riece-user-obarray)))
(if symbol
(let ((symbol (intern-soft (riece-identity-canonicalize-prefix name)
riece-user-obarray)))
(if symbol
- (symbol-value symbol)
+ (progn
+ (riece-cache-get riece-user-cache name)
+ (symbol-value symbol))
(riece-cache-set riece-user-cache name name)
(set (intern (riece-identity-canonicalize-prefix name)
riece-user-obarray)
(riece-cache-set riece-user-cache name name)
(set (intern (riece-identity-canonicalize-prefix name)
riece-user-obarray)