equal
deleted
inserted
replaced
486 (add-to-list 'exec-suffixes ".sh") |
486 (add-to-list 'exec-suffixes ".sh") |
487 (defun executable-find (command) (locate-file command exec-path exec-suffixes)) |
487 (defun executable-find (command) (locate-file command exec-path exec-suffixes)) |
488 ) |
488 ) |
489 |
489 |
490 (ansi-color-for-comint-mode-on) |
490 (ansi-color-for-comint-mode-on) |
|
491 |
|
492 (defun my-ansi-color (&optional beg end) |
|
493 "Interpret ANSI color esacape sequence by colorifying cotent." |
|
494 (interactive |
|
495 (if (use-region-p) |
|
496 (list (region-beginning) (region-end)) |
|
497 (list (point-min) (point-max)))) |
|
498 (ansi-color-apply-on-region beg end)) |
491 |
499 |
492 (setq explicit-bash-args '("-i")) |
500 (setq explicit-bash-args '("-i")) |
493 (setq explicit-sh-args '("-i")) |
501 (setq explicit-sh-args '("-i")) |
494 |
502 |
495 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
503 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |