highlight path separators

This commit is a squash of the work done by
Jorge Israel Peña (blaenk) in #136,
rebased on the latest master branch.

For now, this is disabled in tests.

Author: m0vie

highlighters/main/main-highlighter.zsh

@@ -41,7 +41,9 @@
 : ${ZSH_HIGHLIGHT_STYLES[commandseparator]:=none}
 : ${ZSH_HIGHLIGHT_STYLES[hashed-command]:=fg=green}
 : ${ZSH_HIGHLIGHT_STYLES[path]:=underline}
+: ${ZSH_HIGHLIGHT_STYLES[path_pathseparator]:=underline}
 : ${ZSH_HIGHLIGHT_STYLES[path_prefix]:=underline}
+: ${ZSH_HIGHLIGHT_STYLES[path_prefix_pathseparator]:=underline}
 : ${ZSH_HIGHLIGHT_STYLES[globbing]:=fg=blue}
 : ${ZSH_HIGHLIGHT_STYLES[history-expansion]:=fg=blue}
 : ${ZSH_HIGHLIGHT_STYLES[single-hyphen-option]:=none}
@@ -216,6 +218,7 @@ _zsh_highlight_main_highlighter()
     # which add the entry early so escape sequences within the string override
     # the string's color.
     integer already_added=0
+    integer path_found=0
     local style_override=""
     if [[ $this_word == *':start:'* ]]; then
       in_array_assignment=false
@@ -380,6 +383,7 @@ _zsh_highlight_main_highlighter()
                         else
                           if _zsh_highlight_main_highlighter_check_path; then
                             style=$ZSH_HIGHLIGHT_STYLES[path]
+                            path_found=1
                           else
                             style=$ZSH_HIGHLIGHT_STYLES[unknown-token]
                           fi
@@ -428,6 +432,7 @@ _zsh_highlight_main_highlighter()
                  else
                    if _zsh_highlight_main_highlighter_check_path; then
                      style=$ZSH_HIGHLIGHT_STYLES[path]
+                     path_found=1
                    else
                      style=$ZSH_HIGHLIGHT_STYLES[default]
                    fi
@@ -437,7 +442,10 @@ _zsh_highlight_main_highlighter()
     fi
     # if a style_override was set (eg in _zsh_highlight_main_highlighter_check_path), use it
     [[ -n $style_override ]] && style=$ZSH_HIGHLIGHT_STYLES[$style_override]
-    (( already_added )) || _zsh_highlight_main_add_region_highlight $start_pos $end_pos $style
+    if ! (( already_added )); then
+      _zsh_highlight_main_add_region_highlight $start_pos $end_pos $style
+     (( path_found )) && _zsh_highlight_main_highlighter_highlight_path_separators
+    fi
     if [[ -n ${(M)ZSH_HIGHLIGHT_TOKENS_COMMANDSEPARATOR:#"$arg"} ]]; then
       next_word=':start:'
       highlight_glob=true
@@ -466,6 +474,18 @@ _zsh_highlight_main_highlighter_check_assign()
     [[ $arg == [[:alpha:]_][[:alnum:]_]#(|\[*\])(|[+])=* ]]
 }
 
+_zsh_highlight_main_highlighter_highlight_path_separators()
+{
+  local pos style_pathsep
+  style_pathsep=$ZSH_HIGHLIGHT_STYLES[${style_override:-path}_pathseparator]
+  [[ -z "$style" || "$style" == "$style_pathsep" ]] && return 0
+  for (( pos = start_pos; $pos <= end_pos; pos++ )) ; do
+    if [[ $BUFFER[pos+1] == / ]]; then
+      _zsh_highlight_main_add_region_highlight $pos $((pos + 1)) $style_pathsep
+    fi
+  done
+}
+
 # Check if $arg is a path.
 _zsh_highlight_main_highlighter_check_path()
 {

highlighters/main/test-data/path.zsh

@@ -27,11 +27,14 @@
 # vim: ft=zsh sw=2 ts=2 et
 # -------------------------------------------------------------------------------------------------
 
+ZSH_HIGHLIGHT_STYLES[path_pathseparator]=$unused_highlight
 mkdir A
 touch A/mu
 BUFFER='ls A/mu'
 
 expected_region_highlight=(
-  "1 2 ${(q-)ZSH_HIGHLIGHT_STYLES[command]}" # ls
-  "4 7 ${(q-)ZSH_HIGHLIGHT_STYLES[path]}"     # A/mu
+  "1 2 ${(q-)ZSH_HIGHLIGHT_STYLES[command]}"                # ls
+  "4 4 ${(q-)ZSH_HIGHLIGHT_STYLES[path]}"                   # A
+  "5 5 ${(q-)ZSH_HIGHLIGHT_STYLES[path_pathseparator]}"     # /
+  "6 7 ${(q-)ZSH_HIGHLIGHT_STYLES[path]}"                   # mu
 )

highlighters/main/test-data/path_prefix.zsh

@@ -30,9 +30,12 @@
 # Assumes that '/bin/sh' exists and '/bin/s' does not exist.
 # Related to path_prefix2.zsh
 
-ZSH_HIGHLIGHT_STYLES[path_prefix]=$unused_highlight
+ZSH_HIGHLIGHT_STYLES[path_prefix_pathseparator]=$unused_highlight
 BUFFER='ls /bin/s'
 
 expected_region_highlight=(
-  "4 9 ${(q-)ZSH_HIGHLIGHT_STYLES[path_prefix]}"    # /bin/s
+  "4 4 ${(q-)ZSH_HIGHLIGHT_STYLES[path_prefix_pathseparator]}"    # /
+  "5 7 ${(q-)ZSH_HIGHLIGHT_STYLES[path_prefix]}"                  # bin
+  "8 8 ${(q-)ZSH_HIGHLIGHT_STYLES[path_prefix_pathseparator]}"    # /
+  "9 9 ${(q-)ZSH_HIGHLIGHT_STYLES[path_prefix]}"                  # s
 )

tests/test-highlighting.zsh

@@ -53,6 +53,12 @@
 # Activate the highlighter.
 ZSH_HIGHLIGHT_HIGHLIGHTERS=($1)
 
+# Set path separator styles to their respective non-separator values by default.
+# Otherwise all tests using paths would need to be unnecessarily verbose.
+# Tests that actually test the separator handling should set these to something else first.
+ZSH_HIGHLIGHT_STYLES[path_pathseparator]=$ZSH_HIGHLIGHT_STYLES[path]
+ZSH_HIGHLIGHT_STYLES[path_prefix_pathseparator]=$ZSH_HIGHLIGHT_STYLES[path_prefix]
+
 # Runs a highlighting test
 # $1: data file
 run_test_internal() {