equal
deleted
inserted
replaced
1377 (define-key dired-mode-map (kbd "`") 'my--dired-flag-tmp-files) |
1377 (define-key dired-mode-map (kbd "`") 'my--dired-flag-tmp-files) |
1378 |
1378 |
1379 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1379 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1380 (message "ls-lisp, dired ls") |
1380 (message "ls-lisp, dired ls") |
1381 |
1381 |
1382 (eval-when 'compile (require 'ls-lisp)) |
1382 (require 'ls-lisp) |
1383 |
1383 |
1384 ;; If non-nil - use 'insert-directory-program', which I dislike. |
1384 ;; If non-nil - use 'insert-directory-program', which I dislike. |
1385 (setq ls-lisp-use-insert-directory-program nil) |
1385 (setq ls-lisp-use-insert-directory-program nil) |
1386 (setq ls-lisp-ignore-case t) |
1386 (setq ls-lisp-ignore-case t) |
1387 (setq ls-lisp-dirs-first t) |
1387 (setq ls-lisp-dirs-first t) |
1391 ;; Force use 'ls-lisp-format-time-list'. |
1391 ;; Force use 'ls-lisp-format-time-list'. |
1392 (setq ls-lisp-use-localized-time-format t) |
1392 (setq ls-lisp-use-localized-time-format t) |
1393 (setq ls-lisp-format-time-list |
1393 (setq ls-lisp-format-time-list |
1394 '("%Y-%m-%d %H:%M:%S" |
1394 '("%Y-%m-%d %H:%M:%S" |
1395 "%Y-%m-%d %H:%M ")) |
1395 "%Y-%m-%d %H:%M ")) |
1396 (require 'ls-lisp) |
|
1397 |
1396 |
1398 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1397 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
1399 (message "compression, archive") |
1398 (message "compression, archive") |
1400 |
1399 |
1401 (require 'jka-compr) ; Automatic decompression, hooks for tar-mode. |
1400 (require 'jka-compr) ; Automatic decompression, hooks for tar-mode. |