From 6a7e345bb776c715c0801674ff4cc5feaef08f4c Mon Sep 17 00:00:00 2001 From: Jonathan Leech-Pepin Date: Tue, 18 Nov 2014 07:18:52 -0500 Subject: Refactor sx-network--get-associated to avoid double call to sx-cache-set. Fix provides lines (missed quote on symbol). --- sx-networks.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'sx-networks.el') diff --git a/sx-networks.el b/sx-networks.el index 3a33f1a..2be764f 100644 --- a/sx-networks.el +++ b/sx-networks.el @@ -53,9 +53,9 @@ none)) (defun sx-network--get-associated () - (sx-cache-get - 'network-user - '(sx-network--update))) + (or (sx-cache-get + 'network-user) + (sx-network--update)) (defun sx-network--update () "Update user information." @@ -102,7 +102,7 @@ list of sites the user is active on." (defvar sx-network--user-sites nil "List of sites where user already has an account.") -(provide sx-networks) +(provide 'sx-networks) ;;; sx-networks.el ends here ;; Local Variables: -- cgit v1.2.3