Jason Andorfer jandorfer

## test-eventually
;; Works from repl, but not 'lein test'...

(def waiting (atom false))
(def latest-report (atom nil))

(defn- wrap-report-fn [original]
  (fn [m]
    (if @waiting
      (swap! latest-report (fn [_] m))
      (original m))))

## keybase.md

      
        
          
            
              
              1 file
            
          
          
            
              
              0 forks
            
          
          
            
              
              0 comments
            
          
          
            
              
              0 stars
            
          
        
        
          
              
          
          
            
                jandorfer
                / keybase.md
            
            
              Created
              October 16, 2014 20:36
            
          
        
      
        
  
      
    Keybase proof

I hereby claim:

I am jandorfer on github.
I am jasonandorfer (https://keybase.io/jasonandorfer) on keybase.
I have a public key whose fingerprint is C2B7 A604 EAD5 A417 7A7E  5FF1 5BDD 5FDF 03D5 4A01

To claim this, I am signing this object:
	;; Works from repl, but not 'lein test'...

	(def waiting (atom false))
	(def latest-report (atom nil))

	(defn- wrap-report-fn [original]
	(fn [m]
	(if @waiting
	(swap! latest-report (fn [_] m))
	(original m))))