Skip to content

Instantly share code, notes, and snippets.

View Raynes's full-sized avatar

Anthony Grimes Raynes

View GitHub Profile
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
*** #programming was created on Sunday 2011/09/11 19:07:34
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
;; ERC
(require 'znc)
(require 'todochiku)
(defun highlight-me (match-type nick message)
(unless (posix-string-match "^\\** Users on #" message)
(todochiku-message
(concat "ERC: Highlight on " (buffer-name (current-buffer)))
(concat "<" (first (split-string nick "!")) "> " message)
@Raynes
Raynes / gist
Created November 29, 2011 18:35
[12:33 PM] <Raynes> A fellow told me he wasn't sure 'eval' should be a model.
[12:33 PM] <Raynes> I was like wut.
[12:33 PM] <ibdknox> hm
[12:33 PM] <ibdknox> looks very modely to me
[12:34 PM] <Raynes> He said controller, but it doesn't do anything even remotely controllery.
[12:34 PM] <ibdknox> not at all
(defn- update-nicks [users old-nick new-nick]
(when users
(let [old-data (users old-nick)]
(assoc (dissoc users old-nick) new-nick old-data
)
)
)
)
@Raynes
Raynes / gistt
Created November 23, 2011 21:25
68-245-171-115:clojure-protobuf anthony$ lein protobuf compile
Compiling google/protobuf/descriptor.proto to build/protosrc
Compiling protobuf/core/extensions.proto to build/protosrc
Compiling protobuf/test/codec.proto to build/protosrc
Compiling protobuf/test/core.proto to build/protosrc
Compiling 4 source files to /Users/anthony/code/clojure-protobuf/classes
/Users/anthony/code/clojure-protobuf/build/protosrc/com/google/protobuf/DescriptorProtos.java:9: cannot find symbol
symbol : class ExtensionRegistry
location: package com.google.protobuf
com.google.protobuf.ExtensionRegistry registry) {