portown

<?xml version="1.0" encoding="UTF-8"?>
<skk>
  <section name="dictionary">
    <list>
    </list>
  </section>
  <section name="server">
    <key name="serv" value="0" />
    <key name="host" value="localhost" />
    <key name="port" value="1178" />

portown

SKKIME 1.5 用月配列(U9) on Dvorak レジストリ

オリジナルからの変更点

オリジナル：http://yellow.ribbon.to/~ujiro/tsukiU9_L.gif

• 「かな←→カナ変換」を l に割り当てているため、「ー」を t- に変更（イマイチなのでそのうち変更？）
• 「全角英字入力」を nt に割り当て
• Dvorak 前提のため、右シフトキーの一つ左のキー（「ろ」のキー）はない
• 「Abbrev 入力」を e/ に割り当てているため、アットマークは o/ のみ

portown

;;; recursive-hideshow.el


(require 'hideshow)


(defun jiros--hs-hide-all-recursive-work (minp maxp)
  (goto-char minp)
  (when (hs-find-block-beginning)
    (setq minp (1+ (point)))

portown

;;; skk-tsukiux-dvorak-jisx0201.el
;;; Copyright (C) 2011 YASUDA Jiro

;;; Author: YASUDA Jiro
;;; Time:   '11/02/01


(setq skk-jisx0201-base-rule-list
      '(
        ("\n" nil skk-kakutei)

portown

(add-hook 'twittering-new-tweets-hook
          #'(lambda ()
              (let ((n twittering-new-tweets-count)
                    (statuses twittering-new-tweets-statuses))
                (start-process "twittering-notify" nil "notify-send"
                               "-i" "/usr/share/pixmaps/gnome-emacs.png"
                               (format "New %d tweet%s"
                                       n (if (> n 1) "s" ""))
                               (let ((func (lambda (stat)
                                             (concat (cdr (assq 'user-screen-name stat))