Tasshin Fogleman mwfogleman

I hereby claim:

To claim this, I am signing this object:

Weekly Review

	(defun narrow-or-widen-dwim ()
	"If the buffer is narrowed, it widens. Otherwise, it narrows to region, or Org subtree."
	(interactive)
	(cond ((buffer-narrowed-p) (widen))
	((region-active-p) (narrow-to-region (region-beginning) (region-end)))
	((equal major-mode 'org-mode) (org-narrow-to-subtree))
	(t (error "Please select a region to narrow to"))))

	;; I bind this key to C-c n, using the bind-key function that comes with use-package.
	(bind-key "C-c n" 'narrow-or-widen-dwim)

	; Speed commands are really useful, but I often want to make use of
	; them when I'm not at the beginning of a header. This command brings
	; you back to the beginning of an item's header, so that you can do
	; speed commands.

	(defun org-go-speed ()
	"Goes to the beginning of an element's header, so that you can
	execute speed commands."
	(interactive)
	(when (equal major-mode 'org-mode)

	(defn anagram?
	[s1 s2]
	(let [c1 (clojure.string/lower-case s1)
	c2 (clojure.string/lower-case s2)]
	(and (= (count c1) (count c2))
	(= (set c1) (set c2)))))

	(anagram? "Mathematical Games" "Metamagical Themas")
	; => true

	(def vowels "aeiouyAEIOUY")
	(def consonants "bcdfghjklmnpqrstvwxzBCDFGHJKLMNPQRSTVWXZ")

	(defn alph-filter [sub srn] (clojure.string/capitalize (apply str (remove (set sub) srn))))

	(defn self-alph-filter [sub srn] (alph-filter sub (concat "This " srn)))

	(def init-one "sentence contains no consonants and the following sentence no vowels.")
	(def init-two "sentence contains no vowels and the preceding sentence no consonants.")

	(facts "about aggressive-indent"
	(fact "this is a different fact"
	"I have my own things going on")
	(fact "this function has a trailing parens"
	)) ;; if you do a hungry ctrl-d (:D) on the previous line, everything in the "facts" tests will indent.
	;; ideally it'd just indent the local "defun", in this case, the local fact

	(dolist (hook '(mode1-mode-hook mode2-mode-hook mode3-mode-hook))
	(add-hook hook #'something-mode))

	// solution to https://tour.golang.org/methods/7

	package main

	import "fmt"

	type IPAddr [4]byte

	func (i IPAddr) String() string {
	return fmt.Sprintf("%d.%d.%d.%d", i[0], i[1], i[2], i[3])

	#<Atom@65413b0a:
	{:starting-team :blue,
	:current-team :blue,
	:winning-team nil,
	:id "G__739",
	:created-at
	#object[org.joda.time.DateTime 0x54b2a516 "2017-06-04T01:05:32.915Z"],
	:round 0,
	:words
	({:word "GREECE", :identity :blue, :revealed? false}