2008年02月26日

Cybozu Office 6のカレンダーをGoogle Calendarに取り込む

すごい古い環境で./cybozu2icalを動かそうとしたら、動かなかったので、
Can't locate DateTime.pm in @INC

とか言われたので、よく見ると、
$ head -n1 cybozu2ical

#!/usr/bin/perl

ということだったので、
$ sudo /usr/bin/cpan
[...]
cpan > install DateTime
[...]

で、関連するモジュールを入れて、再チャレンジ。
Can't locate Data/ICal.pm in @INC

とか言われたので、負けじと、
$ sudo /usr/bin/cpan
[...]
cpan> install Data::ICal
[...]

とする。
三度目の挑戦で:
$ ./cybozu2ical > cybozu.ics
Text::CSV_XS or Text::CSV package is required at lib/WWW/CybozuOffice6/Calendar.pm line 89
WWW::CybozuOffice6::Calendar::get_items('WWW::CybozuOffice6::Calendar=HASH(0x9ffc9c8)') called at ./cybozu2ical line 130

まだまだダメっぽくて、
$ sudo /usr/bin/cpan
[...]
cpan> install Text::CSV_XS
[...]

として、やっと四回目にして、成功。

参考:この記事はCybozu Office 6のカレンダーをGoogle Calendarで表示するを読んで、ちょっとやってみようという気になったときのメモである。
ラベル:Perl cybozu
posted by N.T.T with Rails 3.2 (ex. 2.1) at 15:00| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする

2007年08月28日

キーボード。

開発者のこだわり:キーボードがmixi alpha blog (ホントはなんてゆーのか知らないけど。笑。mixi Engineers’ Blogかな?) に出ていた。

新卒で入った会社ではキーボードを半年に一回壊していた

と筆者は言っている。つわものだー。
「キーボードなんて消耗品だよ」と思っていたのですが、それは大間違いでした。

んー、消耗品だけど、そんなに壊れないぞー、普通。

私は1,000円のキーボードやDellのPCに付属のものを普通に使っていますが、別に壊れません。HHKは確かにいいのは知っていますが、別にこだわりないです。人それぞれなので、HHKじゃなきゃイヤという人をどうこうという意味ではなくてね。

IBMのトラックポイント付き
のキーボードは使ってみたいかもしれない。確かに、慣れてくると便利だけど。ThinkPadを嫌っていたその昔、このキーボード見て、え?とか思ったけど、(ThinkPad使用歴のある)今はそうではないかもしれない。

というワケで私が一番よく使うキーボード(my keyboards, not my keyboard)は3,000円くらいかな。keyboardsと書いたけど、最近じゃもう片手で数えられるほどしか使っていない。

※一個で後はディスプレイ/キーボード切替機を使ったりリモートログインして解決する問題ではないので、私の場合 :)
posted by N.T.T with Rails 3.2 (ex. 2.1) at 10:00| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする

2007年07月19日

なかなかいい即席.emacsができたので、公開☆

Meadow 3.00-devに入ってるdot.emacs.jaを参考にしつつ、即席で作った.emacs。毎度毎度Meadow入れるたびに.emacsを一から作っています。

ので、今回はメモっとく。
;;;; -*- mode: emacs-lisp; coding: iso-2022-7bit -*-

;;;; rails.el
(setq load-path (cons "~/.emacs.d/rails" load-path))
(require 'rails)
(setq untabify-exclude-list (cons 'rails-view-minior-mode untabify-exclude-list))
;;; the above code does not work well... why?
(setq write-file-hooks nil)

;;;; where the manual is?
;(setq rails-chm-file "full_path_to_rails_chm_manual")

(require 'psvn)
(add-hook 'dired-mode-hook
'(lambda ()
(require 'dired-x)
;;(define-key dired-mode-map "V" 'cvs-examine)
(define-key dired-mode-map "V" 'svn-status)
(turn-on-font-lock)
))
(setq svn-status-hide-unmodified t)
(setq process-coding-system-alist
(cons '("svn" . utf-8) process-coding-system-alist))

;;;; タブや全角スペースを表示
;;(defface my-face-r-1 '((t (:background "gray15"))) nil)
(defface my-face-b-1 '((t (:background "gray"))) nil)
(defface my-face-b-2 '((t (:foreground "gray" :underline t))) nil)
(defface my-face-u-1 '((t (:foreground "SteelBlue" :underline t))) nil)
;;(defvar my-face-r-1 'my-face-r-1)
(defvar my-face-b-1 'my-face-b-1)
(defvar my-face-b-2 'my-face-b-2)
(defvar my-face-u-1 'my-face-u-1)

(defadvice font-lock-mode (before my-font-lock-mode ())
(font-lock-add-keywords
major-mode
'(("\t" 0 my-face-b-2 append)
(" " 0 my-face-b-1 append)
("[ \t]+$" 0 my-face-u-1 append)
;;("[\r]*\n" 0 my-face-r-1 append)
)))
(ad-enable-advice 'font-lock-mode 'before 'my-font-lock-mode)
(ad-activate 'font-lock-mode)

;;;; セッション自動保存
(require 'session)
(add-hook 'after-init-hook 'session-initialize)


;;;; flymake
(set-face-background 'flymake-errline "red4")
(set-face-background 'flymake-warnline "dark slate blue")


;;;;MSGothic-Consolas
(setq-default line-spacing -1)
(w32-add-font "MSG-Consolas"
'((spec
((:char-spec ascii :height any)
strict
(w32-logfont "Consolas" 0 -11 400 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold)
strict
(w32-logfont "Consolas" 0 -11 700 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :slant italic)
strict
(w32-logfont "Consolas" 0 -11 400 0 t nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold :slant italic)
strict
(w32-logfont "Consolas" 0 -11 700 0 t nil nil 0 1 3 0))
((:char-spec japanese-jisx0208 :height any)
strict
(w32-logfont "HGゴシックM" 0 -13 400 0 nil nil nil 128 1 3 49))
((:char-spec japanese-jisx0208 :height any :slant italic)
strict
(w32-logfont "HGゴシックM" 0 -13 400 0 t nil nil 128 1 3 49))
((:char-spec japanese-jisx0208 :height any :weight bold)
strict
(w32-logfont "HGゴシックM" 0 -13 700 0 nil nil nil 128 1 3 49))
((:char-spec japanese-jisx0208 :height any :weight bold :slant italic)
strict
(w32-logfont "HGゴシックM" 0 -13 700 0 t nil nil 128 1 3 49)))))
(set-face-attribute 'variable-pitch nil :font "MSG-Consolas")
(set-face-attribute 'variable-pitch nil :family "*")

;; 初期フレームの設定
(setq default-frame-alist
(append (list '(foreground-color . "gray")
'(background-color . "black")
'(border-color . "white")
'(mouse-color . "white")
'(cursor-color . "blue")
'(ime-font . (w32-logfont "HGゴシックM"
0 13 400 0 nil nil nil
128 1 3 49))
'(font . "MSG-Consolas")
'(width . 80)
'(height . 60)
'(top . 100)
'(left . 50))
default-frame-alist))

;;;; 初期ディレクトリ
;内緒

;; ;;; Mule-UCS の設定
;; ;; ftp://ftp.m17n.org/pub/mule/Mule-UCS/ が オフィシャルサイトですが、
;; ;; http://www.meadowy.org/~shirai/elisp/mule-ucs.tar.gz に既知のパッチ
;; ;; をすべて適用したものがおいてあります。
;; ;; (set-language-environment) の前に設定します
;; (require 'jisx0213)


;;; 日本語環境設定
(set-language-environment "Japanese")


;;; IMEの設定
(mw32-ime-initialize)
(setq default-input-method "MW32-IME")
(setq-default mw32-ime-mode-line-state-indicator "[--]")
(setq mw32-ime-mode-line-state-indicator-list '("[--]" "[あ]" "[--]"))
(add-hook 'mw32-ime-on-hook
(function (lambda () (set-cursor-height 2))))
(add-hook 'mw32-ime-off-hook
(function (lambda () (set-cursor-height 4))))


;;; マウスカーソルを消す設定
(setq w32-hide-mouse-on-key t)
(setq w32-hide-mouse-timeout 5000)


;;; font-lockの設定
(global-font-lock-mode t)




;; ;;; shell の設定

;; ;;; Cygwin の bash を使う場合
;; (setq explicit-shell-file-name "bash")
;; (setq shell-file-name "sh")
;; (setq shell-command-switch "-c")

;; ;;; Virtually UN*X!にある tcsh.exe を使う場合
;; (setq explicit-shell-file-name "tcsh.exe")
;; (setq shell-file-name "tcsh.exe")
;; (setq shell-command-switch "-c")

;; ;;; WindowsNT に付属の CMD.EXE を使う場合。
;; (setq explicit-shell-file-name "CMD.EXE")
;; (setq shell-file-name "CMD.EXE")
;; (setq shell-command-switch "\\/c")


;;; argument-editing の設定
(require 'mw32script)
(mw32script-init)


;; ;;; browse-url の設定
;; (global-set-key [S-mouse-2] 'browse-url-at-mouse)


;; ;;; 印刷の設定
;; ;; この設定で M-x print-buffer RET などでの印刷ができるようになります
;; ;;
;; ;; notepad に与えるパラメータの形式の設定
;; (define-process-argument-editing "notepad"
;; (lambda (x) (general-process-argument-editing-function x nil t)))
;;
;; (defun w32-print-region (start end
;; &optional lpr-prog delete-text buf display
;; &rest rest)
;; (interactive)
;; (let ((tmpfile (convert-standard-filename (buffer-name)))
;; (w32-start-process-show-window t)
;; ;; もし、dos 窓が見えていやな人は上記の `t' を `nil' にします
;; ;; ただし、`nil' にすると Meadow が固まる環境もあるかもしれません
;; (coding-system-for-write w32-system-coding-system))
;; (while (string-match "[/\\]" tmpfile)
;; (setq tmpfile (replace-match "_" t nil tmpfile)))
;; (setq tmpfile (expand-file-name (concat "_" tmpfile "_")
;; temporary-file-directory))
;; (write-region start end tmpfile nil 'nomsg)
;; (call-process "notepad" nil nil nil "/p" tmpfile)
;; (and (file-readable-p tmpfile) (file-writable-p tmpfile)
;; (delete-file tmpfile))))
;;
;; (setq print-region-function 'w32-print-region)

;; ;;; fakecygpty の設定
;; ;; この設定で cygwin の仮想端末を要求するプログラムを Meadow から
;; ;; 扱えるようになります
;; (setq mw32-process-wrapper-alist
;; '(("/\\(bash\\|tcsh\\|svn\\|ssh\\|gpg[esvk]?\\)\\.exe" .
;; (nil . ("fakecygpty.exe" . set-process-connection-type-pty)))))

;;;
;;; end of file
;;;
ラベル:Emacs .emacs
posted by N.T.T with Rails 3.2 (ex. 2.1) at 11:30| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする

2007年07月16日

MeadowでConsolasフォントを使う (Meiryoフォントがないので)

MeadowをVistaでメイリオとconsolasにとか使うとエラーになるので、
;;;;MSGothic-Consolas
(w32-add-font "MSG-Consolas"
'((spec
((:char-spec ascii :height any)
strict
(w32-logfont "Consolas" 0 -14 400 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold)
strict
(w32-logfont "Consolas" 0 -14 700 0 nil nil nil 0 1 3 0))
((:char-spec ascii :height any :slant italic)
strict
(w32-logfont "Consolas" 0 -14 400 0 t nil nil 0 1 3 0))
((:char-spec ascii :height any :weight bold :slant italic)
strict
(w32-logfont "Consolas" 0 -14 700 0 t nil nil 0 1 3 0))
((:char-spec japanese-jisx0208 :height any)
strict
(w32-logfont "MS ゴシック" 0 -14 400 0 nil nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :slant italic)
strict
(w32-logfont "MS ゴシック" 0 -14 400 0 t nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :weight bold)
strict
(w32-logfont "MS ゴシック" 0 -14 700 0 nil nil nil 128 1 3 49)
((spacing . 1)))
((:char-spec japanese-jisx0208 :height any :weight bold :slant italic)
strict
(w32-logfont "MS ゴシック" 0 -14 700 0 t nil nil 128 1 3 49)
((spacing . 1))))))
(set-face-attribute 'variable-pitch nil :font "MSG-Consolas")


としておいた。なんで、w32-add-fontしてから、w32-change-fontしてんだろ?多分どっかのコピペなんだろーけど。

Meiryo-Consolas @ Meadowとかからかねぇ?

あーぁ、Vista欲しいな、Macくれないんなら、Vistaくれ。


目が疲れる。。。
posted by N.T.T with Rails 3.2 (ex. 2.1) at 10:00| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする

2007年06月28日

モバイル用PCの用意

Dellから薄型のカラフルノートPCが発表されたみたいだ。
けど、やっぱりダサい。
ロゴを見るだけでトラブルを連想してしまう私は異常でしょうか?

Let'snoteユーザだけど、ThinkPadも行けます!もうすぐThinkPadを入手するので、しばらくThinkpadユーザにもなります!!!
posted by N.T.T with Rails 3.2 (ex. 2.1) at 00:02| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする

2007年06月18日

パソコンはどうして遅いんでしょうか?

「PCは遅い!」、ユーザーの6割がストレスというのがシマンテックから出ているそうです。

ソースであるシマンテック、「パソコン利用時のストレス調査」結果を発表には、
8 割のユーザーがパソコンのパフォーマンスに不満を抱え、
7 割はインターネットがなくなれば日常生活に支障をきたすと回答

というサブタイトルが付いている。

まぁ、ホントにその通りである。7割には入っていないが、8割には入ってるなぁーーー。
posted by N.T.T with Rails 3.2 (ex. 2.1) at 23:38| Comment(0) | TrackBack(0) | 開発環境 | このブログの読者になる | 更新情報をチェックする
×

この広告は1年以上新しい記事の投稿がないブログに表示されております。