Emacs: colors improvements (digits, hex).
Shell: highlight theme viewer. Xresources: fixes.master
parent
f102a7907e
commit
c28e9a7b1f
33
.Xresources
33
.Xresources
|
@ -3,7 +3,8 @@
|
|||
!! 2012-07-12
|
||||
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
||||
|
||||
!! TODO: what is charclass ?
|
||||
!! TODO: set up charclass.
|
||||
!! TODO: check Xft options.
|
||||
!! TODO: prevent URxvt from intercepting ALT+Arrows and PageUp/Down.
|
||||
|
||||
!! Xft options
|
||||
|
@ -17,12 +18,12 @@
|
|||
!!------------------------------------------------------------------------------
|
||||
|
||||
! URxvt*modifier: alt
|
||||
URxvt*saveLines: 1000
|
||||
URxvt*saveLines: 5000
|
||||
URxvt*scrollBar: false
|
||||
|
||||
!! Plugins
|
||||
!! clipboard and keyboard-select are not provided by default.
|
||||
URxvt.perl-ext-common : default,matcher,keyboard-select,clipboard
|
||||
URxvt.perl-ext-common : default,matcher,keyboard-select
|
||||
|
||||
! URxvt.keysym.M-v: perl:clipboard:paste
|
||||
! URxvt.keysym.M-C-v: perl:clipboard:paste_escaped
|
||||
|
@ -38,10 +39,9 @@ URxvt.keysym.M-Delete : perl:matcher:list
|
|||
URxvt.urlLauncher : luakit
|
||||
URxvt.underlineURLs : true
|
||||
|
||||
|
||||
!! TODO: Does not work.
|
||||
URxvt*keysym.M-Left: \033[1;3D
|
||||
|
||||
|
||||
!! Font
|
||||
! URxvt*letterSpace: -1
|
||||
|
||||
|
@ -118,29 +118,20 @@ URxvt.color15 : #FFFFFF
|
|||
|
||||
!! Tangoesque style
|
||||
!*background: #111111
|
||||
!*background: #000000
|
||||
!*foreground: #babdb6
|
||||
!! Black (not tango) + DarkGrey
|
||||
! *color0: #000000
|
||||
! *color8: #555753
|
||||
!! DarkRed + Red
|
||||
! *color1: #ff6565
|
||||
! *color9: #ff8d8d
|
||||
!! DarkGreen + Green
|
||||
! *color2: #93d44f
|
||||
! *color10: #c8e7a8
|
||||
!! DarkYellow + Yellow
|
||||
! *color3: #eab93d
|
||||
! *color11: #ffc123
|
||||
!! DarkBlue + Blue
|
||||
! *color4: #204a87
|
||||
! *color12: #3465a4
|
||||
!! DarkMangenta + Mangenta
|
||||
! *color5: #ce5c00
|
||||
! *color13: #f57900
|
||||
!! DarkCyan + Cyan (both not tango)
|
||||
! *color6: #89b6e2
|
||||
! *color14: #46a4ff
|
||||
!! LightGrey + White
|
||||
! *color7: #cccccc
|
||||
! *color8: #555753
|
||||
! *color9: #ff8d8d
|
||||
! *color10: #c8e7a8
|
||||
! *color11: #ffc123
|
||||
! *color12: #3465a4
|
||||
! *color13: #f57900
|
||||
! *color14: #46a4ff
|
||||
! *color15: #ffffff
|
||||
|
|
|
@ -19,7 +19,7 @@
|
|||
# Which colorscheme to use? These colorschemes are available by default:
|
||||
# default, default88, jungle, snow
|
||||
# Snow is monochrome and default88 uses 88 colors.
|
||||
# colorscheme = 'jungle'
|
||||
# colorscheme = 'default'
|
||||
|
||||
# Display the directory name in tabs?
|
||||
dirname_in_tabs = True
|
||||
|
|
|
@ -72,6 +72,8 @@ case "$mimetype" in
|
|||
# Syntax highlight for text files:
|
||||
text/* | */xml)
|
||||
highlight --out-format=ansi "$path" | head -n $maxln
|
||||
# FIXME: does not work!
|
||||
# highlight --out-format=xterm256 -s zmrok "$path" | head -n $maxln
|
||||
success && exit 5 || exit 2;;
|
||||
# Ascii-previews of images:
|
||||
image/*)
|
||||
|
|
124
.emacs
124
.emacs
|
@ -19,8 +19,9 @@
|
|||
;; Line numbers
|
||||
(autoload 'linum-mode "linum" "toggle line numbers on/off" t)
|
||||
(global-set-key (kbd "C-<f5>") 'linum-mode)
|
||||
;; (setq linum-format "%-4d ")
|
||||
(setq linum-format "%d ")
|
||||
(global-linum-mode 1) ; This may generate warnings. Bug?
|
||||
(global-linum-mode 1) ;; FIXME: This may generate warnings. Bug?
|
||||
|
||||
;; Indentation
|
||||
;(setq standard-indent 4) ;; Set standard indent to 2 rather that 4
|
||||
|
@ -84,26 +85,78 @@
|
|||
;; Theme
|
||||
;;==============================================================================
|
||||
|
||||
(set-face-foreground 'font-lock-builtin-face "red" )
|
||||
(set-face-foreground 'font-lock-comment-delimiter-face "color-240" )
|
||||
(set-face-foreground 'font-lock-comment-face "color-240" )
|
||||
(set-face-foreground 'font-lock-constant-face "magenta" )
|
||||
(set-face-foreground 'font-lock-doc-face "brightgreen" )
|
||||
(set-face-foreground 'font-lock-function-name-face "brightcyan" )
|
||||
(set-face-bold-p 'font-lock-function-name-face t )
|
||||
(set-face-foreground 'font-lock-keyword-face "brightred" )
|
||||
(set-face-foreground 'font-lock-preprocessor-face "green" )
|
||||
(set-face-foreground 'font-lock-string-face "color-39" )
|
||||
(set-face-foreground 'font-lock-type-face "color-166" )
|
||||
(set-face-foreground 'font-lock-variable-name-face "brightyellow" )
|
||||
(set-face-foreground 'font-lock-builtin-face "brightmagenta" )
|
||||
(set-face-bold-p 'font-lock-builtin-face t )
|
||||
(set-face-foreground 'font-lock-comment-delimiter-face "color-242" )
|
||||
(set-face-foreground 'font-lock-comment-face "color-242" )
|
||||
(set-face-foreground 'font-lock-constant-face "color-105" )
|
||||
(set-face-foreground 'font-lock-doc-face "color-28" )
|
||||
;; (set-face-underline-p 'font-lock-doc-face t )
|
||||
(set-face-foreground 'font-lock-function-name-face "brightcyan" )
|
||||
(set-face-bold-p 'font-lock-function-name-face t )
|
||||
(set-face-foreground 'font-lock-keyword-face "brightred" )
|
||||
(set-face-bold-p 'font-lock-keyword-face t )
|
||||
(set-face-foreground 'font-lock-preprocessor-face "color-99" )
|
||||
(set-face-foreground 'font-lock-string-face "color-39" )
|
||||
(set-face-foreground 'font-lock-type-face "color-166" )
|
||||
(set-face-foreground 'font-lock-variable-name-face "brightyellow" )
|
||||
(set-face-foreground 'font-lock-warning-face "DarkOrange" )
|
||||
|
||||
(set-face-foreground 'link "brightblue" )
|
||||
(set-face-underline-p 'link t)
|
||||
(set-face-foreground 'minibuffer-prompt "cyan" )
|
||||
(set-face-background 'region "color-17")
|
||||
(set-face-foreground 'error "red")
|
||||
(set-face-bold-p 'error t)
|
||||
;; General
|
||||
(set-face-foreground 'link "brightblue" )
|
||||
(set-face-underline-p 'link t)
|
||||
(set-face-foreground 'minibuffer-prompt "brightcyan" )
|
||||
(set-face-background 'region "color-17")
|
||||
(set-face-foreground 'error "red")
|
||||
(set-face-bold-p 'error t)
|
||||
(set-face-background 'shadow "color-234" ) ;; For line numbers.
|
||||
|
||||
|
||||
;; FIXME: fix C functions color.
|
||||
(font-lock-add-keywords
|
||||
'c-mode
|
||||
'(
|
||||
("&" . font-lock-keyword-face)
|
||||
("\\<\\(and\\|or\\|not\\)\\>" . font-lock-keyword-face)
|
||||
))
|
||||
|
||||
(mapcar
|
||||
(lambda (mode)
|
||||
(font-lock-add-keywords
|
||||
mode
|
||||
'(
|
||||
("[^[:digit:][:space:]][[:space:]]*\\(-\\)[[:digit:]]+" 1 font-lock-constant-face)
|
||||
("\\(0x[[:digit:]a-fA-F]+\\)[^[:alnum:]_]" 1 font-lock-constant-face)
|
||||
("\\([[:digit:]]+\\)[^[:alnum:]_]" 1 font-lock-constant-face)
|
||||
("\\<\\(FIXME\\):" 1 font-lock-warning-face prepend)
|
||||
("\\<\\(TODO\\):" 1 font-lock-warning-face prepend)
|
||||
)))
|
||||
'( text-mode mail-mode
|
||||
sh-mode emacs-lisp-mode lua-mode
|
||||
c-mode
|
||||
latex-mode html-mode texinfo-mode))
|
||||
|
||||
;; C-mode printf highlight.
|
||||
(defvar font-lock-format-specifier-face 'font-lock-format-specifier-face
|
||||
"Face name to use for format specifiers.")
|
||||
|
||||
(defface font-lock-format-specifier-face
|
||||
'((t (:foreground "OrangeRed1")))
|
||||
"Font Lock mode face used to highlight format specifiers."
|
||||
:group 'font-lock-faces)
|
||||
|
||||
;; FIXME: disable highlighting outside of string.
|
||||
(add-hook
|
||||
'c-mode-common-hook
|
||||
(lambda ()
|
||||
(font-lock-add-keywords
|
||||
nil
|
||||
'(("[^%]\\(%\\([[:digit:]]+\\$\\)?[-+' #0*]*\\([[:digit:]]*\\|\\*\\|\\*[[:digit:]]+\\$\\)\\(\\.\\([[:digit:]]*\\|\\*\\|\\*[[:digit:]]+\\$\\)\\)?\\([hlLjzt]\\|ll\\|hh\\)?\\([aAbdiuoxXDOUfFeEgGcCsSpn]\\|\\[\\^?.[^]]*\\]\\)\\)"
|
||||
1 font-lock-format-specifier-face t)
|
||||
("\\(%%\\)"
|
||||
1 font-lock-format-specifier-face t)) )))
|
||||
|
||||
;; FIXME: Does not work.
|
||||
;; (set-face-foreground 'compilation-column-number "magenta")
|
||||
|
||||
;; (set-face-background 'lazy-highlight "brightgreen" )
|
||||
|
@ -113,7 +166,6 @@
|
|||
;; (set-face-foreground 'warning "DarkOrange")
|
||||
;; (set-face-bold-p 'warning t)
|
||||
;; (set-face-foreground 'nobreak-space "cyan")
|
||||
;; (set-face-foreground 'shadow "grey70" ) ;; For line numbers.
|
||||
;; (set-face-foreground 'success "Green1")
|
||||
;; (set-face-bold-p 'success t)
|
||||
|
||||
|
@ -168,6 +220,14 @@
|
|||
auto-mode-alist)
|
||||
)
|
||||
|
||||
;; README
|
||||
(setq auto-mode-alist
|
||||
(append
|
||||
'(("README" . text-mode)
|
||||
)
|
||||
auto-mode-alist)
|
||||
)
|
||||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
;; FUNCTIONS
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
@ -254,19 +314,20 @@
|
|||
;; Original idea from
|
||||
;; http://www.opensubscriber.com/message/emacs-devel@gnu.org/10971693.html
|
||||
(defun comment-dwim-line (&optional arg)
|
||||
"Replacement for the comment-dwim command.
|
||||
If no region is selected and current line is not blank and we are not at the end of the line,
|
||||
then comment current line.
|
||||
Replaces default behaviour of comment-dwim, when it inserts comment at the end of the line."
|
||||
"Replacement for the comment-dwim command. If no region is
|
||||
selected and current line is not blank and we are not at the end
|
||||
of the line, then comment current line. Replaces default
|
||||
behaviour of comment-dwim, when it inserts comment at the end of
|
||||
the line."
|
||||
(interactive "*P")
|
||||
(comment-normalize-vars)
|
||||
(if (and (not (region-active-p)) (not (looking-at "[ \t]*$")))
|
||||
;; (if (and (not (region-active-p)) (not (looking-at "[ \t]*$")))
|
||||
(if (and (not (region-active-p)) )
|
||||
(comment-or-uncomment-region (line-beginning-position) (line-end-position))
|
||||
(comment-dwim arg)))
|
||||
|
||||
(global-set-key "\M-;" 'comment-dwim-line)
|
||||
|
||||
|
||||
|
||||
;;==============================================================================
|
||||
;; My Keys Minor-Mode
|
||||
;;==============================================================================
|
||||
|
@ -455,6 +516,14 @@
|
|||
(add-hook 'TeX-mode-hook 'my-tex-mode-hook)
|
||||
|
||||
|
||||
;; Theme
|
||||
(defun my-tex-font-hook ()
|
||||
(set-face-foreground 'font-latex-sedate-face "brightred" )
|
||||
(set-face-bold-p 'font-latex-sedate-face t)
|
||||
)
|
||||
(add-hook 'TeX-mode-hook 'my-tex-font-hook)
|
||||
|
||||
|
||||
;;==============================================================================
|
||||
;; Lua
|
||||
;;==============================================================================
|
||||
|
@ -487,3 +556,4 @@
|
|||
|
||||
;;==============================================================================
|
||||
;;==============================================================================
|
||||
;;
|
||||
|
|
|
@ -232,6 +232,53 @@ man()
|
|||
man "$@"
|
||||
}
|
||||
|
||||
## Highlight themes viewer for 256-colors terminals.
|
||||
hlt-viewer ()
|
||||
{
|
||||
print_help()
|
||||
{
|
||||
echo "Synopsis:"
|
||||
echo -e " $1"
|
||||
echo
|
||||
echo "This script displays a preview for every highlight's theme."
|
||||
echo "Press ENTER to display next preview. Press anything else then ENTER to quit."
|
||||
}
|
||||
|
||||
if [ ! -f "/usr/bin/highlight" ];then
|
||||
echo "Please install 'highlight'."
|
||||
return
|
||||
fi
|
||||
|
||||
if [ $# -gt 0 ]; then
|
||||
print_help "$0"
|
||||
return
|
||||
fi
|
||||
|
||||
|
||||
LIST=$(highlight -w | grep -v "\s\|^$")
|
||||
SAMPLE="void function(char* pointer, int &ref)
|
||||
{
|
||||
int integer=3;
|
||||
char* string=\"Hello!\";
|
||||
|
||||
// Line comment
|
||||
for ( i=0; i<10; i++)
|
||||
{
|
||||
printf(\"Sum: %d\\\n\", i*( integer+14 ) );
|
||||
}
|
||||
}"
|
||||
|
||||
unset DUMMY
|
||||
for i in $(highlight -w | grep -v "\s\|^$"); do
|
||||
echo "******************** $i ********************"
|
||||
highlight -S c -O xterm256 <(echo $SAMPLE) -s "$i"
|
||||
read -s DUMMY
|
||||
if [ ! "$DUMMY" = "" ];then
|
||||
return
|
||||
fi
|
||||
done
|
||||
}
|
||||
|
||||
## Extractor -- Useless when using 'atool'.
|
||||
if [ ! -e "/usr/bin/atool" ]; then
|
||||
extract () {
|
||||
|
|
12
README
12
README
|
@ -1,7 +1,7 @@
|
|||
################################################################################
|
||||
# Unix Home Configuration #
|
||||
# Author: Ambrevar #
|
||||
# Date: 2012-07-05 #
|
||||
# Date: 2012-07-17 #
|
||||
################################################################################
|
||||
|
||||
Synopsis
|
||||
|
@ -57,7 +57,9 @@ Emacs
|
|||
*****
|
||||
Extra deps: auctex, auto-complete, emacs-lua-mode, emacs-yasnippet,
|
||||
|
||||
Not much personal work, mostly use of plugins. Still very powerful.
|
||||
Some keybindings and custom colors. (I find it more convenient on a 256-colors
|
||||
terminal.) Some customization -- columns, kill whole line, etc. Some plugins
|
||||
customization too.
|
||||
|
||||
Luakit
|
||||
******
|
||||
|
@ -84,6 +86,8 @@ custom theme, various tweaks.
|
|||
|
||||
Ranger
|
||||
******
|
||||
Extra deps: antiword, atool, highlight, img2txt, mediainfo, pdftotext, w3m.
|
||||
|
||||
Custom bindings, file association, tweaked a few options.
|
||||
|
||||
Scripts
|
||||
|
@ -106,6 +110,10 @@ folder .shell.d/, whose files get sourced by both bash and zsh. Bash-specific
|
|||
and zsh-specific options are in dedicated files ending with the apropriate shell
|
||||
name.
|
||||
|
||||
URxvt
|
||||
*****
|
||||
Custom font and colors, no scroll bar, url-matcher and keyboard-select.
|
||||
|
||||
Vim
|
||||
***
|
||||
I've only been a casual Vim user, so do not expect too much from it.
|
||||
|
|
Loading…
Reference in New Issue