arnolddevos

import Pattern._
import Family._

def pattern[B](pf: PartialFunction[Name,B]) = new Extractor(pf.lift)

val Parents = new Extractor(parents.get)
val Children = new Extractor(children.get)

"Julie" match {
  case Parents(p) => "Julies parents are: " + p

mislav

Pagination 101

Article by Faruk Ateş, [originally on KuraFire.net][original] which is currently down

One of the most commonly overlooked and under-refined elements of a website is its pagination controls. In many cases, these are treated as an afterthought. I rarely come across a website that has decent pagination, and it always makes me wonder why so few manage to get it right. After all, I'd say that pagination is pretty easy to get right. Alas, that doesn't seem the case, so after encouragement from Chris Messina on Flickr I decided to write my Pagination 101, hopefully it'll give you some clues as to what makes good pagination.

Before going into analyzing good and bad pagination, I want to explain just what I consider to be pagination: Pagination is any kind of control system that lets the user browse through pages of search results, archives, or any other kind of continued content. Search results are the o

mikeyk

from django.contrib.sessions.backends.base import SessionBase, CreateError
from django.conf import settings
from django.utils.encoding import force_unicode
import redis

class SessionStore(SessionBase):
    """ Redis store for sessions"""

    def __init__(self, session_key=None):
        self.redis = redis.Redis(

fallwith

$> launchctl unload -w ~/Library/LaunchAgents/com.mysql.mysqld.plist

$> /usr/local/Cellar/mysql/5.5.9/bin/mysqld --basedir=/usr/local/Cellar/mysql/5.5.9 --datadir=/usr/local/Cellar/mysql/5.5.9/data --plugin-dir=/usr/local/Cellar/mysql/5.5.9/lib/plugin --log-error=/usr/local/Cellar/mysql/5.5.9/data/errors.err --pid-file=/usr/local/Cellar/mysql/5.5.9/data/pidfile.pid --skip-grant-tables

$> mysql

mysql> UPDATE mysql.user SET Password=PASSWORD('root_password') WHERE User='root';
mysql> FLUSH PRIVILEGES;

$> kill `cat /usr/local/Cellar/mysql/5.5.9/data/pidfile.pid`

paularmstrong

/**
 *  AStar
 *
 *  Created by Paul Armstrong on 2011-05-26.
 *  Copyright (c) 2011 Paul Armstrong Designs. All rights reserved.
 *
 *  Based on: https://gist.github.com/827899
 */

ig.module('plugins.a-star')

mrluanma

import os
import errno
import urllib
import re
from urlparse import urlparse
from hashlib import md5
import httplib2
from lxml import html

hyone

;; hyone's solution to Merge with a Function
;; https://4clojure.com/problem/69

(fn my-merge-with [f & maps]
  (reduce
    (fn [a b]
      (reduce
        (fn [x [k v]]
          (assoc x k (if (b k) (f v (b k)) v)))
        b a))

kachayev

"""Simple TCP server for playing Tic-Tac-Toe game.

Use Player-to-Player game mode based on naming auth. 
No thoughts about distribution or pub/sub mode 
(for monitoring or something like this). Just 
basic functionality.
"""

import time
import logging

vybs

{#profile_skill}
<div class="section" id="profile-skills" style="display:block">
  <div class="header">
    <h2>{@pre:i18n text="Skills"}</h2>
  </div>
{?skills} {! we still want to display the Skills heading, even if the number of skills is zero !}
<div class="content">
    <ol class="skills" id="skills-list">  
    {#skills}
      <li class="competency show-bean">

Pet3ris

(ns fsm
  (:refer-clojure :exclude [==])
  (:use [clojure.core.logic]))

;; Encoding a Finite State Machine and recognizing strings in its language in Clojure core.logic

;; We will encode the following FSM:
;;
;;  (ok) --+---b---> (fail) 
;;   ^     |