Skip to content

Instantly share code, notes, and snippets.

View sroccaserra's full-sized avatar
🐿️

Sébastien Roccaserra sroccaserra

🐿️
View GitHub Profile
@sroccaserra
sroccaserra / gist:295969
Created February 5, 2010 16:57
Emacs Lisp loop usage
(defun fibbo (n)
(if (<= n 1)
1
(+ (fibbo (- n 1))
(fibbo (- n 2)))))
(loop for i from 10 to 20
collect (list i (fibbo i)))
@sroccaserra
sroccaserra / gist:305424
Created February 16, 2010 10:04
clj script (Clojure) for cygwin
#!/usr/bin/sh
CP=`cygpath -wp '.:/Developer/clojure/clojure.jar:/Developer/clojure-contrib/clojure-contrib.jar'`
if [ -z $1 ]; then
rlwrap java -cp "$CP" clojure.main
else
java -cp "$CP" clojure.main "$@"
fi
import urllib2
class MyHttpBrowser(object):
def __init__(self, baseUrl, loginUrl, username, password, digest = True):
self.baseUrl = baseUrl
self.loginUrl = loginUrl
self.username = username
self.password = password
auth_handler = urllib2.HTTPDigestAuthHandler() if digest else urllib2.HTTPBasicAuthHandler()
auth_handler.add_password(realm = 'Some Realm',
(defun run-clojure-tests ()
(save-buffer)
(cond ((slime-connected-p)
(save-window-excursion
(unless (symbol-value 'clojure-test-mode)
(find-file (replace-regexp-in-string "/src/" "/test/"
(replace-regexp-in-string "\\.clj$" "_test.clj"
(buffer-file-name)))))
(save-window-excursion
(with-current-buffer "*slime-repl clojure*"
@sroccaserra
sroccaserra / gist:834957
Created February 19, 2011 09:20
Vim's "insert character above / below cursor"
(defun vim-get-line-forward (n)
"Returns the Nth line forward, or nil when reaching buffer end. N can be negative."
(save-excursion
(let ((row (line-number-at-pos)))
(beginning-of-line)
(forward-line n)
(unless (not (= n (- (line-number-at-pos) row)))
(buffer-substring-no-properties (line-beginning-position) (line-end-position))))))
(defun vim-insert-char-from-other-line (n)
@sroccaserra
sroccaserra / Feuil1
Created July 28, 2014 09:19
Adjust Excel Sprint Burndown Chart axis
Private Sub Worksheet_Change(ByVal Target As Range)
Dim KeyCells As Range
Set KeyCells = Range("B2")
If Not Application.Intersect(KeyCells, Range(Target.Address)) Is Nothing Then
Module1.ajuster
End If
End Sub
@sroccaserra
sroccaserra / gist:4ae9be499c3013ef849b
Last active August 29, 2015 14:05
Notes Node / Angular

Package.json :

scripts: {
    "postinstall": "bower install",

    "prestart": "npm install",
    "start": "http-server -a 0.0.0.0 -p 8000",

Dépôt intéressant :

@sroccaserra
sroccaserra / gist:795099687386ff10d35c
Created September 8, 2014 08:23
Bash prompt for dangerous tasks
function ask_yes_or_no() {
read -p "$1 ([y]es or [N]o): "
case $(echo $REPLY | tr '[A-Z]' '[a-z]') in
y|yes) echo "yes" ;;
*) echo "no" ;;
esac
}
# And an example using it:
@sroccaserra
sroccaserra / post-merge
Created October 7, 2014 09:09
Watch `package.json` updates and run npm install (save as `.git/hooks/post-merge`)
git diff --pretty="format:" --name-only "HEAD@{1}" | grep "^package.json$" && npm install
@sroccaserra
sroccaserra / exampleOfFilterAndMapInJava8.java
Last active December 6, 2017 16:44
Examples of filter, map, and reduce in Java 8
final List<String> integerStrings = Arrays.asList("1", "1", "", "3", null, "5");
final Set<Integer> integers = integerStrings.stream()
.filter(StringUtils::isNotBlank)
.map(Integer::valueOf)
.collect(Collectors.toSet());