([cl-struct-emacs-achievement "Achiever" "You used the achievements package." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Not All There" "You have a fractional achievement score." (lambda nil (and (/= achievements-score (round achievements-score)))) nil nil 0.5 0 nil] [cl-struct-emacs-achievement "Unlocker" "You have earned over 50 points in Emacs achievements. Not bad." t nil nil 5 0 advanced-achievements] [cl-struct-emacs-achievement "Over Achiever" "You have earned 500 points in Emacs achievements. Don't you have some real work to do?" (lambda nil (and (>= achievements-score 500))) nil nil 5 0 nil] [cl-struct-emacs-achievement "Cheater" "You have earned all Emacs achievements. Actually that's impossible." (lambda nil (and (every (function achievements-earned-p) achievements-list))) nil nil 5 0 nil] [cl-struct-emacs-achievement "Free Software Zealot" "You've read the sales pitch." t nil nil 5 0 nil] [cl-struct-emacs-achievement "First things first" "You learned new things by using `help-for-help'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Show me the way" "You learned new things by using `help-with-tutorial'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "RTFM" "You learned new things by using `info-emacs-manual'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Log Auditor" "You learned new things by using `view-echo-area-messages'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "FAQ" "You learned new things by using `view-emacs-FAQ'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "What's new?" "You learned new things by using `view-emacs-news'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Am I the only one?" "You learned new things by using `view-emacs-problems'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Entomologist" "You learned new things by using `view-emacs-debugging'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Joining the cause" "You learned new things by using `view-emacs-todo'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Where else can I look?" "You learned new things by using `view-external-packages'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "World Traveler" "You learned new things by using `(view-hello-file describe-language-environment describe-input-method describe-coding-system)'." (lambda nil (and (achievements-command-was-run (quote (view-hello-file describe-language-environment describe-input-method describe-coding-system))))) nil nil 5 0 nil] [cl-struct-emacs-achievement "Package Hunter" "You learned new things by using `(finder-by-keyword describe-package)'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "I know I read it somewhere" "You answered a question by using `apropos-documentation'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Apropos of Nothing" "You answered a question by using `apropos'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "Answer in search of a question" "You answered a question by using `apropos-value'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "What to type?" "You answered a question by using `describe-bindings'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "What does this do?" "You answered a question by using `(describe-function Info-goto-emacs-command-node info-lookup-symbol describe-variable describe-mode)'." (lambda nil (and (achievements-command-was-run (quote (describe-function Info-goto-emacs-command-node info-lookup-symbol describe-variable describe-mode))))) nil nil 5 0 nil] [cl-struct-emacs-achievement "What happens when I do this?" "You answered a question by using `(describe-key describe-key-briefly Info-goto-emacs-key-command-node where-is)'." (lambda nil (and (achievements-command-was-run (quote (describe-key describe-key-briefly Info-goto-emacs-key-command-node where-is))))) nil nil 5 0 nil] [cl-struct-emacs-achievement "When is a word not a word?" "You answered a question by using `describe-syntax'." t nil nil 5 0 nil] [cl-struct-emacs-achievement "What did I just do?" "You answered a question by using `(command-history view-lossage)'." t nil nil 5 0 nil] [cl-struct-emacs-achievem