Sebastián Moreno kernelp4nic

## tag.clj
"
Usage:

  In code:
    (tag> value)   or (t> form arg1 arg2 ...)     to tag a value to stdout.
    (tagseq> 20 x) or (ts> 20 form arg1 arg2 ...) to tag a sequence, printing 20 items.
    Note: the value of a (tag>) or (t>) or (tagseq>) or (ts>) form is always the complete
          value, so it can be inserted into code without a problem.

  At the REPL:

## shed.scad
windows = false;  // show windows
stuff = false; // Show bikes, table, mower

l = 32; // Length of building in feet (16, 20, 24, 28, 32, ...)
h = 8*12-4.5+.5;
rl=6*12+1.375+.1; // cut to 73.5" long with 22.5 degree angles
tl = 68.7; // Used to tweak headers on top walls

// 2x6 concrete forms for foundation
// 10" wide grid

## redis-autostart-osx.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                kernelp4nic
                / redis-autostart-osx.md
            
            
              Created
              May 25, 2018 13:50
                — forked from subfuzion/redis-autostart-osx.md
            
              
                redis auto start OS X
              
          
    Install with Homebrew

brew install redis

Set up launchctl to auto start redis
$ ln -sfv /usr/local/opt/redis/*.plist ~/Library/LaunchAgents

/usr/local/opt/redis/ is a symlink to /usr/local/Cellar/redis/x.y.z (e.g., 2.8.7)

  
## if-let-multi-and-when-let-multi.clj
(defmacro assert-all
  [& pairs]
  `(do (when-not ~(first pairs)
         (throw (IllegalArgumentException.
                  (str (first ~'&form) " requires " ~(second pairs) " in " ~'*ns* ":" (:line (meta ~'&form))))))
       ~(let [more (nnext pairs)]
          (when more
            (list* `assert-all more)))))

(defmacro when-let*

## collectd.conf
#
# Config file for collectd(1).
# Please read collectd.conf(5) for a list of options.
# http://collectd.org/
#

##################
# Global settings
##################

## nginx.conf
# to generate your dhparam.pem file, run in the terminal
openssl dhparam -out /etc/nginx/ssl/dhparam.pem 2048

## core.clj
(ns friendtest.core
  (:use midje.sweet
        ring.mock.request
        compojure.core
        friendtest.core
        [ring.middleware.session store memory]
        [ring.middleware.session.memory :only (memory-store)]
        [ring.middleware.session :only (wrap-session)]
        [cemerick.friend.util :only (gets)])
  (:require [compojure [handler :as handler]]

## Devices.java
/*
 * Copyright (C) 2014 Jared Rummler <jared.rummler@gmail.com>
 *
 * Licensed under the Apache License, Version 2.0 (the "License");
 * you may not use this file except in compliance with the License.
 * You may obtain a copy of the License at
 *
 *      http://www.apache.org/licenses/LICENSE-2.0
 *
 * Unless required by applicable law or agreed to in writing, software

## Redis-Ruby_Inverted-Index-Search-(Antirez)
--

## _readme.markdown

      
              5 files
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                kernelp4nic
                / _readme.markdown
            
            
              Created
              March 22, 2014 18:14
                — forked from karmi/_readme.markdown
            
          
    Simplistic Full-Text Search With Redis's Sorted Sets

Howto

git clone git://gist.github.com/923934.git redisearch

cd redisearch
	"
	Usage:

	In code:
	(tag> value) or (t> form arg1 arg2 ...) to tag a value to stdout.
	(tagseq> 20 x) or (ts> 20 form arg1 arg2 ...) to tag a sequence, printing 20 items.
	Note: the value of a (tag>) or (t>) or (tagseq>) or (ts>) form is always the complete
	value, so it can be inserted into code without a problem.

	At the REPL:
	windows = false; // show windows
	stuff = false; // Show bikes, table, mower

	l = 32; // Length of building in feet (16, 20, 24, 28, 32, ...)
	h = 8*12-4.5+.5;
	rl=6*12+1.375+.1; // cut to 73.5" long with 22.5 degree angles
	tl = 68.7; // Used to tweak headers on top walls

	// 2x6 concrete forms for foundation
	// 10" wide grid
	(defmacro assert-all
	[& pairs]
	`(do (when-not ~(first pairs)
	(throw (IllegalArgumentException.
	(str (first ~'&form) " requires " ~(second pairs) " in " ~'ns ":" (:line (meta ~'&form))))))
	~(let [more (nnext pairs)]
	(when more
	(list* `assert-all more)))))

	(defmacro when-let*
	#
	# Config file for collectd(1).
	# Please read collectd.conf(5) for a list of options.
	# http://collectd.org/
	#

	##################
	# Global settings
	##################
	# to generate your dhparam.pem file, run in the terminal
	openssl dhparam -out /etc/nginx/ssl/dhparam.pem 2048
	(ns friendtest.core
	(:use midje.sweet
	ring.mock.request
	compojure.core
	friendtest.core
	[ring.middleware.session store memory]
	[ring.middleware.session.memory :only (memory-store)]
	[ring.middleware.session :only (wrap-session)]
	[cemerick.friend.util :only (gets)])
	(:require [compojure [handler :as handler]]
	/*
	* Copyright (C) 2014 Jared Rummler <jared.rummler@gmail.com>
	*
	* Licensed under the Apache License, Version 2.0 (the "License");
	* you may not use this file except in compliance with the License.
	* You may obtain a copy of the License at
	*
	* http://www.apache.org/licenses/LICENSE-2.0
	*
	* Unless required by applicable law or agreed to in writing, software