바람이 불 때

emacs make-frame hook 을 이용한 새 창에서 함수 호출하기.

톱아보다 — Thu, 22 Mar 2012 19:51:56 +0900

나는 org 모드에 거의 모든 내용을 기록해 놓는다. 그리고 아주 자주 검색하기 때문에 지금 프레임이나 창에 영향 받지 않고 검색한 다음에 바로 닫고 싶었다. (뭐 org 에서 검색 기능을 이미 제공할 것 같기도 하지만..)
그래서 새프레임을 열고 함수를 호출하는 기능이 필요하다.

일단 쉽게 생각할 수 있는 방법은 아래와 같을 것이다.

(defun foo ()
  (interactive)
  (make-frame)
  (next-frame)
  (do some thing...)
)

프레임을 만들고 프레임을 옮기고 뭔가 동작하기. 그런데 그게 쉽지 않다. 커서는 저 함수가 끝날 때까지 원래 프레임에 계속 머무른다.

방법은 뭘까? 좀 복잡해질지도 모르지만 훅을 이용하면 된다.

make-frame 에는 after-make-frame-functions 라는 훅이 존재한다. 해당 훅에 프레임을 옮긴 후 해야 할 일을 기술해 놓으면 된다.

(defun make-frame-and-org-find ()
  (interactive)
  (add-hook 'after-make-frame-functions 'finish-make-frame-and-find-org)
  (make-frame)
)

(defun finish-make-frame-and-find-org (frame)
  (remove-hook 'after-make-frame-functions 'finish-make-frame-and-find-org)
  (select-frame frame)
  (let ((query (read-from-minibuffer "org-string : " (concat (thing-at-point 'symbol) "") nil nil))) 
    (find-grep 
     (concat "find ~/org/job -type f -name *.org -print0 | xargs -0 -e grep -nH -e " query)))
)

kindle4 vs iriver storyK

톱아보다 — Thu, 19 Jan 2012 09:03:57 +0900

kindle4 vs Story K


category	kindle3	iriver storyK
release	late 2011	early 2012
cost	92,000 ($79) 구매대행비, 배송비 미포함	99,000 쿠폰 및 각종 할인 혜택 적용 가능
display	6"	6"
resolution	600x800	600x800
color lv	16 gray	8 gray
weight	170g	208g
size(mm)	116x114	125x190
thickness(mm)	8.7	9.3
memory	2G	2G
external memory	.	sdcard
network	wifi	wifi
keyboard	soft	h/w
warranty	1 year free
CPU	coretex A8 800Mhz	coretex A8 800Mhz
RAM	256M
display	Eink 101
merit	many plugin	korean contents
else weakness	delivery fee, A/S, no korean content	not support underline, comment

그래서 스토리K 를 질렀습니다.
8 gray color 가 아쉽긴 하지만 만화책이나 그림을 볼 용도가 아니라 텍스트만 읽을건데 상관 없을 듯 합니다.
iriver 화이팅!!

리눅스용 daum 영한 사전 스크립트

톱아보다 — Wed, 18 Jan 2012 10:43:39 +0900

쉘에서 간단하게 daum 영한 사전을 볼 수 있는 스크립트입니다. (한-영은 안됩니다.)

다음과 같이 사용하면 됩니다.

s-han.lee@s-han:~/bin$ dict bind

구속력이 있다, 굳어지다, 묶는 것

#!/usr/bin/python
# -*- coding: utf-8 -*-
# s-han.lee@samsung.com
# daum dictionary --pretty

def daumDict(word):
    import urllib2
    import re
    url = "http://small.dic.daum.net/search.do?q="+ word +"&dic=eng"
    try:
        source = urllib2.urlopen(url).read()
    except:
        print "load webpage fail. check your internet connection."
        return

    p = re.compile(r'
(.*)
')
    m = p.search(source)
    try:
        print m.group(1).replace("&nbsp;", " ")
    except:
        print "cannot found " + word

import sys
import getopt
if __name__ == "__main__":
    if len(sys.argv) is 1:
        print "insucfficient args"
        sys.exit(1)
    word = sys.argv[1]
    daumDict( word )

emacs 의 경우아래 내용들을 .emacs 에 추가하시고 사용하시면 f8 또는 meta-f8 로 간단하게 영한 사전을 이용할 수 있습니다.

(defun eng-dict (query)
  (interactive (list (read-from-minibuffer "eng>han : " (concat (thing-at-point 'symbol) "") nil nil)))
  (message (substring (shell-command-to-string (concat "~/bin/dict " query)) 0 -1))
  )

(defun search-eng-dict ()
  (interactive)
  (message (substring (shell-command-to-string (concat "~/bin/dict " (concat (thing-at-point 'symbol) ""))) 0 -1))
  )

(global-set-key [(f8)] 'quick-eng-dict)
(global-set-key [(meta f8)] 'eng-dict)

emacs major mode 만들기

톱아보다 — Tue, 23 Aug 2011 00:02:22 +0900

내 기어이 major-mode 를 만들게 되는구나-_ -;;
회사에서 관련 파일을 볼때 불편한 점이 있어서 간단하게 메이저 모드를 만들게 됐다.
회사 보안상 어떤 파일에 대한 메이저 모든인지 뭔지 감히 말도 못 하지만...
아무튼 관련자료를 링크해둔다

아주 간단한 HTML6 모드 만들기
http://xahlee.org/emacs/elisp_html6-mode.html

아주 약간더 복잡한 메이저 모드 만들기
http://xahlee.org/emacs/elisp_syntax_coloring.html

모드 이름 정하기
http://xahlee.org/emacs/elisp_naming_your_mode.html

메이저 모드 샘플
http://www.gnu.org/software/emacs/elisp/html_node/Example-Major-Modes.html

메이저 모드에서 사용하는 변수들 리스트
http://www.gnu.org/s/emacs/manual/html_node/elisp/Faces-for-Font-Lock.html

메이저 모드 키맵 정의하기
http://xahlee.org/emacs/elisp_menu_for_major_mode.html

comment 핸들링 하기
http://xahlee.org/emacs/elisp_comment_handling.html

emacs re-builder mode
http://xahlee.org/emacs/emacs_regex.html

이것 외에도 메이저 모드에서 지원 가능한 요소들은 다음과 같다.
font lock
handle comments
indentation
keyword completion
function documentation lookup
function template insertion
graphical menus
supporting emacs's customize-group scheme

학술동아리 로고 작업

톱아보다 — Sun, 21 Aug 2011 16:29:58 +0900

학교 학술 동아리 로고 작업을 해달라는 말이 있어서 2시간 정도 작업한 산출물-_-;;
생각보다 잘 나온듯.
역시 학술동아리 로고는 좀 칙칙해야 맛.

카드문자 네이버 가계부로 자동 입력 - 릴리즈

톱아보다 — Sun, 14 Aug 2011 02:01:36 +0900

마켓 : https://market.android.com/details?id=beonit.NaverMoneySync&feature=search_result

혼자 쓰면서 불편한 없이 살고 있었는데.......... 망할 네이버에서 로그인 방식을 비틀면서 머리가 아파졌군요.
이김에 git 로 갈아타고 새로 짜서 새로 올렸습니다. https://github.com/beonit/NaverMoneySync
프로그램에 대한 자세한 설명도 거기에 써있습니다.

기능은 다음과 같습니다.
1. 카드사 문자 오면 네이버에 기록해주기
2. 혹시 네트워크 장애로 인해서 기록이 안되면 백업해두고 나중에 한꺼번에 기록하기
3. 네이버에 자동 로그인하여 네이버 가계부 모바일에 쉽게 접속하기
4. 현금 사용을 네이버에 기록하기

지원되는 카드사 번호들은 다음과 같습니다.

자신의 지원되지 않으면 직접 코드에 추가하세요-_-
2011-08-14
15888900       : SAMSUNG
15888700       : SAMSUNG
15886700       : KEB
15884000       : WOORI
0220085000    : WOORI - 외국
15884000       : BC
15888100       : LOTTE
15887000       : CITY
15887200       : ?
15991155       : HANA
15881688       : KB

emacs 사각형 영역 선택과 작업

톱아보다 — Thu, 21 Jul 2011 13:38:49 +0900

윈도우에서 일부 편집기는 alt+drag 를 이용한 사각형 영역 선택이 가능하다.

이맥스에서는 당연히 가능하다.

emacs 에서 구글링하는 함수

톱아보다 — Wed, 13 Jul 2011 00:06:55 +0900

emacs 에서 바로 구글링하기.
browse-url 이 인코딩을 제대로 처리하지 못하는지 한글은 지원하지 않는다.

gnuwin32 find error

톱아보다 — Mon, 13 Jun 2011 14:15:22 +0900

gnuwin32 에서 find를 사용할 때 -name 에 wildcard 문자를 포함해서 검색하면

"Usage: find.exe [-H] [-L] [-P] [path...] [expression]"

라는 오류를 뿜으며 제대로 동작하지 않을 때가 있다.

원인은 원인은 윈도우 cmd에서 wildcard 문자를 먼저 먼저 치환하고 명령어를 실행시키기 때문인데 딱히 답이 없는지 2005년에 마지막으로 빌드된 버전임에도 불구하고 수정되고 있지 않다.

현재 해결 방법은 wildcard 문자로 치환된 파일이 없는 디렉토리에서 명령을 실행하는 것 정도 밖에 없다. 소스코드를 내려받고 확인해보고 싶긴하다.

내용 확인 : http://www.mail-archive.com/gnuwin32-users@lists.sourceforge.net/msg01582.html

emacs에서 java 상속구조 파악 하는 함수

톱아보다 — Sat, 21 May 2011 12:40:24 +0900

코드 분석하는데 java 상속구조를 파악할 일이 있어서 cscope-egrep 을 조금 확장해서 java 클래스 정의와 서브 클래스를 찾아주는 함수를 만들었다.
클래스 상속구조를 파악할 때 쓸 수있다.

my-cscope-find-class-definistion : 클래스 정의 찾기
my-cscope-find-base-definistion : 클래스를 상속하는 서브 클래스 찾기