diff --git a/.config/ranger/scope.sh b/.config/ranger/scope.sh index edc86bc8..baaaba3b 100755 --- a/.config/ranger/scope.sh +++ b/.config/ranger/scope.sh @@ -88,7 +88,7 @@ case "$mimetype" in # Syntax highlight for text files: text/* | */xml) try highlight --out-format=ansi "$path" && { dump | trim; exit 5; } || exit 2;; - # FIXME: does not work! + # TODO: does not work! # highlight --out-format=xterm256 -s zmrok "$path" | head -n $maxln # Ascii-previews of images: diff --git a/.emacs.d/main.el b/.emacs.d/main.el index eceb9b23..0a5acf36 100644 --- a/.emacs.d/main.el +++ b/.emacs.d/main.el @@ -38,7 +38,7 @@ (autoload 'linum-mode "linum" "toggle line numbers on/off" t) ;; (setq linum-format "%-4d ") (setq linum-format "%d ") -(global-linum-mode 1) ;; FIXME: This may generate warnings with emacsclient. Bug? +(global-linum-mode 1) ;; TODO: This may generate warnings with emacsclient. Bug? (define-key my-keys-minor-mode-map (kbd "C-") 'linum-mode) ;; Toggle line numbers. ;; Indentation @@ -90,21 +90,20 @@ (windmove-default-keybindings)) ;; Browser -;; (setq browse-url-generic-program -;; (executable-find -;; (lambda () -;; (if (getenv "BROWSERsd") -;; (getenv "BROWSERsd") -;; (format "dwb") -;; ) -;; )) -;; browse-url-browser-function 'browse-url-generic) - -;; (setq browse-url-generic-program (executable-find (getenv "BROWSER")) -;; browse-url-browser-function 'browse-url-generic) +(setq browse-url-generic-program + (executable-find + (let ((b (getenv "BROWSER"))) + (if b b "w3m" ))) + browse-url-browser-function 'browse-url-generic) ;; Default ispell dictionnay -(setq ispell-dictionary "fr") +;; (setq ispell-dictionary "fr") +(define-key my-keys-minor-mode-map + (kbd "C-") + (lambda () (interactive) (ispell-change-dictionary "en"))) +(define-key my-keys-minor-mode-map + (kbd "C-") + (lambda () (interactive) (ispell-change-dictionary "fr"))) ;; Use color escape sequences. Only use if needed. ;; (add-hook 'shell-mode-hook 'ansi-color-for-comint-mode-on) diff --git a/.emacs.d/theme.el b/.emacs.d/theme.el index 4682cdfc..878ec4a1 100644 --- a/.emacs.d/theme.el +++ b/.emacs.d/theme.el @@ -108,7 +108,7 @@ c-mode lua-mode python-mode latex-mode html-mode texinfo-mode)) -;; FIXME: fix C functions color. +;; TODO: fix C functions color. ;; (font-lock-add-keywords ;; 'c-mode ;; '( @@ -125,7 +125,7 @@ ;; "Font Lock mode face used to highlight format specifiers." ;; :group 'font-lock-faces) -;; FIXME: disable highlighting outside of string. +;; TODO: disable highlighting outside of string. ;; (add-hook ;; 'c-mode-common-hook ;; (lambda () @@ -136,7 +136,7 @@ ;; ("\\(%%\\)" ;; 1 font-lock-format-specifier-face t)) ))) -;; FIXME: Does not work. +;; TODO: Does not work. ;; (add-hook ;; 'c-mode-common-hook ;; (set-face-foreground 'compilation-column-number "magenta") diff --git a/.shell.d/titlecase.awk b/.shell.d/titlecase.awk index 0d04bfeb..70296ca6 100644 --- a/.shell.d/titlecase.awk +++ b/.shell.d/titlecase.awk @@ -183,7 +183,7 @@ function titlecase(string,x) { # Double exception 1: Set 1st word of string in Cap case # Need to handle potential internal single/double quotes like # "A Day in the Life" or 'On the Waterfront' - # WARNING: here we consider digits as part of a work (as in 1st, 2nd, etc.) + ## WARNING: here we consider digits as part of a work (as in 1st, 2nd, etc.) match(a, /[A-Za-z0-9]/) a = toupper(substr(a,1,RSTART)) substr(a,RSTART+1)