(#s(emacs-achievement "Achiever" "You used the achievements package." t nil nil 5 0 nil) #s(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) #s(emacs-achievement "Unlocker" "You have earned over 50 points in Emacs achievements. Not bad." t nil nil 5 0 advanced-achievements) #s(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) #s(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) #s(emacs-achievement "Free Software Zealot" "You've read the sales pitch." t nil nil 5 0 nil) #s(emacs-achievement "First things first" "You learned new things by using `help-for-help'." t nil nil 5 0 nil) #s(emacs-achievement "Show me the way" "You learned new things by using `help-with-tutorial'." t nil nil 5 0 nil) #s(emacs-achievement "RTFM" "You learned new things by using `info-emacs-manual'." t nil nil 5 0 nil) #s(emacs-achievement "Log Auditor" "You learned new things by using `view-echo-area-messages'." t nil nil 5 0 nil) #s(emacs-achievement "FAQ" "You learned new things by using `view-emacs-FAQ'." t nil nil 5 0 nil) #s(emacs-achievement "What's new?" "You learned new things by using `view-emacs-news'." t nil nil 5 0 nil) #s(emacs-achievement "Am I the only one?" "You learned new things by using `view-emacs-problems'." t nil nil 5 0 nil) #s(emacs-achievement "Entomologist" "You learned new things by using `view-emacs-debugging'." t nil nil 5 0 nil) #s(emacs-achievement "Joining the cause" "You learned new things by using `view-emacs-todo'." t nil nil 5 0 nil) #s(emacs-achievement "Where else can I look?" "You learned new things by using `view-external-packages'." t nil nil 5 0 nil) #s(emacs-achievement "World Traveler" "You learned new things by using `(view-hello-file describe-language-environment describe-input-method describe-coding-system)'." t nil nil 5 0 nil) #s(emacs-achievement "Package Hunter" "You learned new things by using `(finder-by-keyword describe-package)'." t nil nil 5 0 nil) #s(emacs-achievement "I know I read it somewhere" "You answered a question by using `apropos-documentation'." t nil nil 5 0 nil) #s(emacs-achievement "Apropos of Nothing" "You answered a question by using `apropos'." t nil nil 5 0 nil) #s(emacs-achievement "Answer in search of a question" "You answered a question by using `apropos-value'." t nil nil 5 0 nil) #s(emacs-achievement "What to type?" "You answered a question by using `describe-bindings'." t nil nil 5 0 nil) #s(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)'." t nil nil 5 0 nil) #s(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)'." t nil nil 5 0 nil) #s(emacs-achievement "When is a word not a word?" "You answered a question by using `describe-syntax'." t nil nil 5 0 nil) #s(emacs-achievement "What did I just do?" "You answered a question by using `(command-history view-lossage)'." t nil nil 5 0 nil) #s(emacs-achievement "Shortcut genius" "You don't need to learn new shortcuts anymore." t nil nil 5 0 nil) #s(emacs-achievement "Streamlined" "Your .emacs took less that 1 second to load." (lambda nil (and (< (float-time (time-subtract after-init-time before-init-time)) 1))) t nil 5 0 nil) #s(emacs-achievement "Oops" "Your .emacs file had an error." t nil nil 5 0 nil) #s(emacs-achievement "Traditionalist" "You use .emacs instead of .emacs.d/init.el." (lambda nil (and (string-match "/\\.emacs\\'" user-init-file))) nil nil 5 0 nil) #s(emacs-achievement "Modernist" "You use .emacs.d/init.el instead of .emacs." t nil nil 5 0 nil) #s(emacs-achievement "Post Modernist"
>?\205\304 \"\211G\305\232\207" [this-command achievements--arrow-key-replacement-commands last-input-event achievements--arrow-keys-needing-replacements delete 0] 4] 5 0 nil) #s(emacs-achievement "Inception" "You have used recursive editing and exited succesfully." t nil nil 5 0 nil) #s(emacs-achievement "Narrow minded" "You have used narrowing." t nil nil 5 0 nil) #s(emacs-achievement "Forbidden Fruits" "You have used all disabled commands." t nil nil 5 0 nil) #s(emacs-achievement "Enabler" "You have enabled all commands." t nil nil 5 0 nil) #s(emacs-achievement "Case Changer" "You have changed the case of a few words." t nil nil 5 0 nil) #s(emacs-achievement "CASE CHANGER" "You have changed the case of vast amounts of text." t nil nil 5 0 nil) #s(emacs-achievement "The Great Destroyer" "You have laid waste to an entire buffer in one go." t nil nil 5 0 nil) #s(emacs-achievement "Goal Setter" "You have set the goal column." t nil nil 5 0 nil) #s(emacs-achievement "Wide Load" "You have scrolled to see an extra wide buffer." t nil nil 5 0 nil) #s(emacs-achievement "Dired reuse" "You have reused a dired buffer to look at another file/directory." t nil nil 5 0 nil) #s(emacs-achievement "Yes Man" "You can't say no." (lambda nil (and (and (>= (length yes-or-no-p-history) 10) (every (lambda (x) (equal "yes" x)) yes-or-no-p-history)))) nil nil 5 0 nil) #s(emacs-achievement "Leaving Home" "You have edited files outside your home directory." t nil nil 5 0 nil) #s(emacs-achievement "The Examined Life" "You have command logging enabled." t nil nil 5 0 nil) #s(emacs-achievement "Playing it Safe" "Your .emacs is under version control." t nil nil 5 0 nil) #s(emacs-achievement "Arbitrator" "You have used smerge-mode to resolve conflicts." (lambda nil (and (achievements-command-was-run (quote (smerge-keep-all smerge-keep-base smerge-keep-current smerge-keep-mine smerge-keep-other))))) nil nil 5 0 nil) #s(emacs-achievement "Surfs up" "You use Emacs for surfing the web" (lambda nil (and (achievements-command-was-run (quote (eww eww-browse-url eww-open-file w3 w3-fetch w3-open-local w3-quit w3m w3m-browse-url w3m-find-file))))) nil nil 5 0 nil) #s(emacs-achievement "Polyglot" "You have used over 20 major-modes at once." t nil nil 5 0 nil) #s(emacs-achievement "Org-anizer" "You have used `org-mode'." t nil nil 5 0 org-achievements))
