Blame view

plugins/wd/_wd.sh 1.93 KB
093a6c34b   mj   Squashed 'repos/r...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  #compdef wd
  
  zstyle ':completion:*:descriptions' format '%B%d%b'
  zstyle ':completion::complete:wd:*:commands' group-name commands
  zstyle ':completion::complete:wd:*:warp_points' group-name warp_points
  zstyle ':completion::complete:wd::' list-grouped
  
  zmodload zsh/mapfile
  
  function _wd() {
    local CONFIG=$HOME/.warprc
    local ret=1
  
    local -a commands
    local -a warp_points
  
    warp_points=( "${(f)mapfile[$CONFIG]//$HOME/~}" )
  
    commands=(
      'add:Adds the current working directory to your warp points'
      'add!:Overwrites existing warp point'
      'rm:Removes the given warp point'
56a5793ce   mj   Squashed 'repos/r...
23
24
25
      'list:Outputs all stored warp points'
      'ls:Show files from given warp point'
      'path:Show path to given warp point'
093a6c34b   mj   Squashed 'repos/r...
26
27
      'show:Outputs all warp points that point to the current directory or shows a specific target directory for a point'
      'help:Show this extremely helpful text'
56a5793ce   mj   Squashed 'repos/r...
28
29
      'clean:Remove points warping to nonexistent directories'
      'clean!:Remove nonexistent directories without confirmation'
093a6c34b   mj   Squashed 'repos/r...
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
      '..:Go back to last directory'
    )
  
    _arguments -C \
      '1: :->first_arg' \
      '2: :->second_arg' && ret=0
  
    case $state in
      first_arg)
        _describe -t warp_points "Warp points" warp_points && ret=0
        _describe -t commands "Commands" commands && ret=0
        ;;
      second_arg)
        case $words[2] in
          add\!|rm)
            _describe -t points "Warp points" warp_points && ret=0
            ;;
          add)
            _message 'Write the name of your warp point' && ret=0
            ;;
          show)
            _describe -t points "Warp points" warp_points && ret=0
            ;;
56a5793ce   mj   Squashed 'repos/r...
53
54
55
56
57
58
          ls)
            _describe -t points "Warp points" warp_points && ret=0
            ;;
          path)
            _describe -t points "Warp points" warp_points && ret=0
            ;;
093a6c34b   mj   Squashed 'repos/r...
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
        esac
        ;;
    esac
  
    return $ret
  }
  
  _wd "$@"
  
  # Local Variables:
  # mode: Shell-Script
  # sh-indentation: 2
  # indent-tabs-mode: nil
  # sh-basic-offset: 2
  # End:
  # vim: ft=zsh sw=2 ts=2 et