Skip to content

Instantly share code, notes, and snippets.

@luozengbin
luozengbin / clipboard-to-kill-ring.el
Created October 5, 2011 15:04 — forked from tomykaira/clipboard-to-kill-ring.el
OS Xのクリップボードを定期的に監視してkill-ringに入れます
;;; clipboard-to-kill-ring.el
;;; * 概要
;;; OS Xのクリップボードを定期的に監視してkill-ringに入れます
;;; deferred.elが必要です
;;;
;;; * 使い方
;;; (clipboard-to-kill-ring t)
;;; で監視を始めます
;;; clipboard-to-kill-ring:interval を設定するとポーリングの間隔を変えられます.
@luozengbin
luozengbin / emacs.rb
Created October 30, 2011 04:26 — forked from uskanda/emacs.rb
Homebrew Emacs 23.3a for OSX Lion with native full-screen, inline patch
require 'formula'
class Emacs < Formula
url 'http://ftp.gnu.org/pub/gnu/emacs/emacs-23.3a.tar.bz2'
md5 'f2cf8dc6f28f8ae59bc695b4ddda339c'
homepage 'http://www.gnu.org/software/emacs/'
if ARGV.include? "--use-git-head"
head 'git://repo.or.cz/emacs.git'
else
@luozengbin
luozengbin / battery.sh
Created November 21, 2011 02:26 — forked from valvallow/battery.sh
battery.sh
#!/bin/sh
current=`grep "remaining" /proc/acpi/battery/*/state | sed 's/[a-zA-Z: ]//g'`
total=`grep "design capacity:" /proc/acpi/battery/*/info | sed 's/[a-zA-Z: ]//g'`
rate=`grep "present rate:" /proc/acpi/battery/*/state | sed 's/[a-zA-Z: ]//g'`
charging=`grep "charging state:" /proc/acpi/battery/*/state | sed 's/[a-zA-Z ]*:[ ]*//g'`
if [ $rate -eq 0 ]; then
echo $charging
exit 0
@luozengbin
luozengbin / smartrep-viewer.el
Created January 30, 2012 23:12 — forked from ongaeshi/smartrep-viewer.el
smartrep.el を使って2つのバッファを同時にスクロール出来るViewer機能を作ってみた。
;;--------------------------------------------------------------------------
;; smartrep
;;--------------------------------------------------------------------------
(require 'smartrep)
;;--------------------------------------------------------------------------
;; smartrep viewer
;;--------------------------------------------------------------------------
; プレフィックスキーの設定
@luozengbin
luozengbin / notify-send.sh
Created February 6, 2012 04:31 — forked from valvallow/notify-send.sh
notify-send for windows
#!/bin/sh
VALUE_ICON=`cygpath -d "$HOME/pict/terminal.png"`
VALUE_TITLE="terminal"
VALUE_MESSAGE="Ha!!"
while getopts hi:t:m: OPT
do
case $OPT in
@luozengbin
luozengbin / init-windows.el
Created July 5, 2012 08:55
emacs窗口布局自动保存跟复原
;;
;; win:resume-windows --> windows 状态保存跟复原
;;______________________________________________________________________
;;; 安装
;; http://www.emacswiki.org/emacs/WindowsMode
;; http://www.gentei.org/~yuuji/software/
;; (install-elisp "http://www.gentei.org/~yuuji/software/windows.el")
;; (install-elisp "http://www.gentei.org/~yuuji/software/revive.el")
@luozengbin
luozengbin / anything-gist.el
Created July 17, 2012 14:06 — forked from tlync/anything-gist.el
anything for old version gist
;;; anything-gist.el --- anything-sources and some utilities for gist.
;; Filename: auto-complete-acr.el
;; Description: Anything extension for gist
;; Author: myuhe <yuhei.maeda_at_gmail.com>
;; Maintainer: myuhe, tlync<takuya.fujimura_at_gmail.com>
;; Copyright (C) 2009, 2010, myuhe , all rights reserved.
;; Created: 2009-04-13
;; Version: 0.7
;; Keywords: convenience, anything, git, gist
;; font
(create-fontset-from-ascii-font "Ricty-11:weight=normal:slant=normal" nil "ricty")
(set-fontset-font "fontset-ricty"
'unicode
(font-spec :family "Ricty" :size 11)
nil
'append)
(add-to-list 'default-frame-alist '(font . "fontset-ricty"))
<channels version="Sat, 04 Aug 2012 14:50:04.2084 GMT" info_time="Thu, 05 Apr 2007 09:19:03 GMT">
<group id="1" type="1" en="Sports Test Group" cn="体育频道测试组" description="Description:Sport Channels 体育频道 (Note: Please don't broadcast infringing content) All the channels are from the Internet. SopCast is only a P2P technology provider. Please contact the channel owner for infringing issues. Schedule:24*7 Type:Free to watch, need authorization to broadcast ">
Sports Test Group [体育频道测试组]
<channel id="18134" type="0" btype="0" language="en">
<name en="Nederlandse oefenwedstijden -eredivisielive" cn="">Nederlandse oefenwedstijden -eredivisielive</name>
<status>2</status>
<region en="United Kingdom" cn="英国">UK</region>
<class en="Sports" cn="体育类">2</class>
<user_count>6</user_count>
<sn>4440</sn>
@luozengbin
luozengbin / shibuya-el-position-paper.md
Created September 6, 2012 07:59 — forked from ainame/shibuya-el-position-paper.md
shibuya.elのポジションペーパーです。githubアカウントをお持ちの方はforkしてお使いください。

Shibuya.el#1 ポジションペーパー

Personal