■掲示板に戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 最新50



レス数が1000を超えています。残念ながら全部は表示しません。

くだらない質問はここに書き込め!なんでもアリ4

1 :うひひ@ミントッー :01/11/26 17:15
ゼターイにクソスレ立てないよう
好評の「くだらない質問総合窓口」パート4を作りました。

書き込む前に質問に適切な専門の板・スレッドがないか確認してください。
過去ログもご利用下さい。 パートI
http://pc.2ch.net/test/read.cgi?bbs=unix&key=987158067 パートII
http://pc.2ch.net/test/read.cgi/unix/996642453/
くだらない質問はここに書き込め!なんでもアリ3
http://pc.2ch.net/test/read.cgi/unix/1002700894/

2CH総合検索サイト http://2ch.dyn.to/

UNIXにまつわる政治・経済・宗教・技術・国際・生活・スポーツ・娯楽・性の悩み
な質問何でもありです 不適切な質問も徹底したハードな罵倒で適切なところに導いて
いただけると思いますのでご安心ください。
満足な答えが返ってきたら命賭けで(;´Д`)ハァハァな工口URLを添えてお礼して下さい。

NGワード・注意事項 *UNIXって何ですか?系 *純Linux系
*がいしゅつ・マルチネタ禁止 *6行以上のアスキーアート各種禁止 *ネタage禁止

996 :名無しさん@お腹いっぱい。 :02/01/12 13:57
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; byte-compile (.emacs, )
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defun compare-timestamp (el elc)
"compare timestamp
-: el is older.
+: el is newner.
nil: elc is not exist."
(let ((f.el (expand-file-name el))
(f.elc (expand-file-name elc))
(tfunc (function (lambda (f)
(+ (* 65536 (- (nth 0 (nth 5 (file-attributes f))) 10000))
(nth 1 (nth 5 (file-attributes f)))))))
;; 10000 is magic num!
;; = 6.98 years.
)
(if (null (file-exists-p f.elc))
nil
(- (funcall tfunc el) (funcall tfunc elc)))))

;;; byte-compile (.emacs, ) --- do!!
(let* ((el "~/.emacs")(elc "~/.emacs.elc")
(tm (compare-timestamp el elc)))
(if (and tm (> 0 tm))
()
(save-excursion
(byte-compile-file el))))

997 :名無しさん@お腹いっぱい。 :02/01/12 13:57
;;気軽にバイトコンパイル。
(defun kasu-byte-compile-this-file ()
"Compile current-buffer-file of Lisp into a file of byte code."
(interactive)
(byte-compile-file buffer-file-name t))
(global-set-key "\C-x!" 'kasu-byte-compile-this-file)

998 :名無しさん@お腹いっぱい。 :02/01/12 13:59
;; 最終更新日の自動挿入
;; ファイルの先頭から 8 行以内に Time-stamp: <> または
;; Time-stamp: " " と書いてあれば、セーブ時に自動的に日付が挿入されます
(if (not (memq 'time-stamp write-file-hooks))
(setq write-file-hooks
(cons 'time-stamp write-file-hooks)))

999 :名無しさん@お腹いっぱい。 :02/01/12 14:03
(・∀・)1000!

1000 :名無しさん@お腹いっぱい。 :02/01/12 14:05
1000!(^^)/

1001 :1001 :Over 1000 Thread
このスレッドは1000を超えました。
もう書けないので、新しいスレッドを立ててくださいです。。。


掲示板に戻る 全部 前100 次100 最新50

read.cgi ver5.26+ (01/10/21-)