Skip to content

Instantly share code, notes, and snippets.

View samflores's full-sized avatar
🦕

Samuel Flores samflores

🦕
78 followers · 59 following
View GitHub Profile
@samflores
samflores / send_mail.rb
Created June 27, 2012 22:02
Enviar e-mail
require 'mail'
Mail.defaults do
delivery_method :smtp, {
:address => '<smtp server>',
:port => 587,
:user_name => '<username>',
:password => '<password>',
:authentication => 'plain',
:enable_starttls_auto => true }
@samflores
samflores / document.json
Created August 29, 2012 15:23
doc = {
name: "Samuel Flores",
exams: [
{name: "Eletro-cardiograma", date: "2012-08-10"},
{name: "Hemacias", date: "2012-08-09"},
{name: "Tomografia", date: "2012-08-10"},
{name: "Hemacias", date: "2012-06-10"},
{name: "Ressonancia Magnetica", date: "2012-05-10"},
{name: "Whatever", date: "2012-04-10"},
{name: "Whatever", date: "2012-03-10"},
@samflores
samflores / render-partial.clj
Created September 4, 2012 16:32
(defn render [template data partials]
(render-resource
(str "templates/" template ".mustache")
data
(reduce #(assoc %1 %2 (slurp (io/resource (str "templates/" %2 ".mustache")))) {} partials)))
(render "index" {:name "John Smith"} '[header footer])
@samflores
samflores / mongo-sample.clj
Created September 10, 2012 17:43
(require 'monger.core)
(require 'monger.collection)
(connect!)
(set-db! (get-db "database-name"))
(insert "people" {:name "Samuel Flores" :age 28})
@samflores
samflores / gist:3831150
Created October 4, 2012 02:33
tell application "System Preferences"
open
activate
end tell
# can be defined as uncicode data (U+D83D U+DE04) or the actual emoji character
set emojis to {¬
{":smile:", «data utxtD83DDE04» as Unicode text}, ¬
{":grim:", "😬"} ¬
}
@samflores
samflores / gist:4216483
Created December 5, 2012 15:22
# Clojure definition for ctags
# put on ~/.ctags
--langdef=clojure
--langmap=clojure:.clj
--regex-clojure=/^\(def[ \t]+(\^\{.*\})?[ \t]*([^ \t]+).*/\2/d,definition/
--regex-clojure=/^\(defn[ \t]+(\^\{.*\})?[ \t]*([^ \t]+).*/\2/d,function definition/
--regex-clojure=/^\(defn\-[ \t]+(\^\{.*\})?[ \t]*([^ \t]+).*/\2/d,private function definition/
--regex-clojure=/^\(defmacro[ \t]+(\^\{.*\})?[ \t]*([^ \t]+).*/\2/d,macro definition/
@samflores
samflores / index.html
Created December 13, 2012 15:17
<!DOCTYPE html>
<html>
<head>
<script type="text/javascript" src="d3.v2.min.js"></script>
<style type="text/css">
body { height: 100%; width: 100%; }
.link { stroke: #ccc; }
.nodetext { pointer-events: none; font: 10px sans-serif; }
</style>
</head>
@samflores
samflores / case.rb
Created March 5, 2013 14:42
I found something like this in a blog post. I agree with the post subject, just don't understand why the author choose the following idiom
foo = case value
when nil
NullObject.new
else
value
end
@samflores
samflores / .vimrc
Created March 21, 2013 16:36
Esse é o meu arquivo .vimrc. Esse script ~/bin/background_color é um shell script que retorna light ou dark. Isso deveria setar o background do Vim, mas quando inicio o vim não tá fazendo efeito. O que eu acho curioso é que se, depois de aberto, eu executar source ~/.vimrc, funciona
let bg=system("~/bin/background_color")
set background="".bg
colorscheme solarized
@samflores
samflores / gist:6028608
Created July 18, 2013 11:30
#!/bin/sh
set -e
### BEGIN INIT INFO
# Provides: postgresql
# Required-Start: $local_fs $remote_fs $network $time
# Required-Stop: $local_fs $remote_fs $network $time
# Should-Start: $syslog
# Should-Stop: $syslog
# Default-Start: 2 3 4 5