Skip to content

Instantly share code, notes, and snippets.

Avatar
🎧

KOBAYASHI Shigeru kosh04

🎧
View GitHub Profile
View nocaps.sh
#!/bin/sh
# http://gist.github.com/500229.txt
if [ "$TERM" = "linux" ]; then
# NOTE: dumpkeys & loadkeys command enable superuser only
dumpkeys | sed -e 's/keycode 58 = Caps_Lock/keycode 58 = Control/' | loadkeys
# echo 'keycode 58 = Control' | loadkeys
else
# Make CapsLock an additional Ctrl.
setxkbmap -option ctrl:nocaps
View scheme_button.lsp
#!/usr/bin/newlisp
;; 第1回 Scheme コードバトン (newLISP fork)
;;
;; ■ これは何か?
;; Scheme のコードをバトンのように回していき面白い物ができあがるのを楽しむ遊びです。
;; 次回 Shibuya.lisp で成果を発表します。
;; Scheme 初心者のコードを書くきっかけに、中級者には他人のコードを読む機会になればと思います。
;;
;; ■ 2 つのルール
View package.lisp
;; -*- Mode: Lisp; Syntax: Common-Lisp -*-
;;; Package Management
(in-package :cl-user)
(defpackage :hige
(:use :cl
:drakma
:cl-ppcre)
#+ABCL (:shadow :y-or-n-p)
View gist:93934
;;; -*- mode: emacs-lisp -*-
;;;
;;; Lisp 関数だけに色付け
;;; http://www.bookshelf.jp/cgi-bin/goto.cgi?file=meadow&node=font-lock-func
;;; Usage:
;; (require 'elisp-font-lock)
;;; Code: