1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
|
#compdef emacs emacsclient
# ------------------------------------------------------------------------------
# Copyright (c) 2022 Github zsh-users - https://github.com/zsh-users
# All rights reserved.
#
# Permission is hereby granted, free of charge, to any person obtaining
# a copy of this software and associated documentation files (the
# "Software"), to deal in the Software without restriction, including
# without limitation the rights to use, copy, modify, merge, publish,
# distribute, sublicense, and/or sell copies of the Software, and to
# permit persons to whom the Software is furnished to do so, subject to
# the following conditions:
#
# The above copyright notice and this permission notice shall be included
# in all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
# OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
# THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
# OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
# ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
# OTHER DEALINGS IN THE SOFTWARE.
# ------------------------------------------------------------------------------
# Description
# -----------
#
# Completion script for emacs 31. (https://www.gnu.org/software/emacs/)
#
# ------------------------------------------------------------------------------
# Authors
# -------
#
# * Shohei YOSHIDA (https://github.com/syohex)
#
# ------------------------------------------------------------------------------
case $service in
(emacs)
_arguments -s \
'--batch[do not do interactive display, implies -q]' \
'--chdir[change to directory]:dir:_files -/' \
'(--daemon --bg-daemon --fg-daemon)'{--daemon,--bg-daemon=-}'[start a named server in the background]::name' \
'(--daemon --bg-daemon --fg-daemon)--fg-daemon=-[start a named server in the foreground]::name' \
'--debug-init[enable Emacs Lisp debugger for init file]' \
'(-d --display)'{-d,--display}'[use X server DISPLAY]:display:_x_display' \
'--module-assertions[assert behavior of dynamic modules]' \
'--dump-file[read dumped state from FILE]:file:_files' \
'(- *)--fingerprint[output fingerprint and exit]' \
'--seccomp=[read Seccomp BPF filter from FILE]: :_files' \
'--no-build-details[do not add build details such as time stamps]' \
'--no-desktop[do not load a saved desktop]' \
'(-q --no-init-file)'{-q,--no-init-file}'[loader neither ~/.emacs nor default.el]' \
'(-nl --no-loadup)'{-nl,--no-loadup}'[do not load loadup.el]' \
'--no-site-file[do not load site-start.el]' \
'--no-x-resources[do not load X resources]' \
'(-nsl --no-site-lisp)'{-nsl,--no-site-lisp}'[do not add site-lisp directories to load-path]' \
'--no-splash[do not display a splash screen on startup]' \
'(-nw --no-window-system)'{-nw,--no-window-system}'[do not communicate with X, ignoring $DISPLAY]' \
'--init-directory=[use DIR when looking for the Emacs init files]:dir:_files -/' \
'(-Q --quick)'{-Q,--quick}'[equivalent to -q --no-site-file --no-site-lisp --no-splash --no-x-resources]' \
'--script[run FILE as an Emacs Lisp script]:file:_files' \
'-x[same as -Q --script]' \
'(-t --terminal)'{-t,--terminal}'[use DEVICE for terminal IO]: :_files' \
'(-u --user)'{-u,--user}"[load user's init file instead of your own]" \
\*{-L,--directory}'[prepend DIR to load-path(with :DIR, append DIR)]: :_files -/' \
{--eval,--execute}'[evaluate Emacs Lisp expression EXPR]:expr' \
\*{--file,--find-file,--visit}'[visit FILE]: :_files' \
\*{-f,--funcall}'[call Emacs Lisp function FUNC with no arguments]:func' \
'--insert[insert contents of FILE into current buffer]:file:_files' \
'--kill[exit without asking for confirmation]' \
\*{-l,--load}'[load Emacs Lisp FILE using the load function]: :_files' \
'(-bg --background-color)'{-bg,--background-color}'[window background color]:color' \
'(-D --basic-display)'{-D,--basic-display}'[disable many display features]' \
'(-bg --border-color)'{-bg,--border-color}'[main border color]:color' \
'(-bw --border-width)'{-bw,--border-width}'[width of main border]' \
'--color=-[override color mode for character terminals]:: :(auto never always ansi8)' \
'(-cr --cursor-color)'{-cr,--cursor-color}'[color of the Emacs cursor indicating point]:color' \
'(-fn --font)'{-fn,--font}'[default font, must be fixed-width]:font' \
'(-fg --foreground)'{-fg,--foreground}'[window foreground color]:color' \
'(-fh --fullheight)'{-fh,--fullheight}'[make the first frame high as the screen]' \
'(-fs --fullscreen)'{-fs,--fullscreen}'[make the first frame fullscreen]' \
'(-fw --fullwidth)'{-fw,--fullwidth}'[make the first frame wide as the screen]' \
'(-mm --maximized)'{-mm,--maximized}'[make the first frame maximized]' \
'(-g --geometry)'{-g,--geometry}'[window geometry]:geometry' \
'(-nbi --no-bitmap-icon)'{-nbi,--no-bitmap-icon}'[do not use picture of gnu for Emacs icon]' \
'--iconic[start Emacs in iconified state]' \
'(-ib --internal-border)'{-ib,--internal-border}'[width between text and main border]:width' \
'(-lsp --line-spacing)'{-lsp,--line-spacing}'[additional space to put between lines]' \
'(-ms --mouse-color)'{-ms,--mouse-color}'[mouse cursor color in Emacs window]:color' \
'(-T --name --title)'{-T,--name,--title}'[title for initial Emacs frame]:title' \
'(-nbc,--no-blinking-cursor)'{-nbc,--no-blinking-cursor}'[disable blinking cursor]' \
'(-r -rv --reverse-video)'{-r,-rv,--reverse-video}'[switch foreground and background]' \
'(-vb --vertical-scroll-bars)'{-vb,--vertical-scroll-bars}'[enable vertical scroll bars]' \
'--xrm[set additional X resources]:resource' \
'--parent-id[set parent window]:xid' \
'(- *)--help{display help and exit}' \
'(- *)--version[output version information and exit]' \
'*:: :_files'
;;
(emacsclient)
_arguments -s -n : \
'(- *)'{-V,--version}'[Print version information and exit]' \
'(- *)'{-H,--help}'[Print this usage information message and exit]' \
'(-nw -t --tty --no-window-system)'{-nw,-t,--tty,--no-window-system}'[Open a new Emacs frame on the current terminal]' \
'(-c --create-frame)'{-c,--create-frame}'[Create a new frame instead of trying to use the current Emacs frame]' \
'(-r --reuse-frame)'{-r,--reuse-frame}'[Create a new frame if none exists, otherwise use the current Emacs frame]' \
'(-F --frame-parameters)'{-F,--frame-parameters=}'[Set the parameters of a new frame]:alist' \
'(-e --eval)'{-e,--eval}'[Evaluate as Emacs Lisp expressions]' \
'(-n --no-wait)'{-n,--no-wait}'[Returns immediately without waiting for finish]' \
'(-w --timeout)'{-w,--timeout=}'[Seconds to wait before timing out]:seconds' \
'(-q --quiet)'{-q,--quiet}"[Don't display messages on success]" \
'(-u --suppress-output)'{-u,--suppress-output}"[Don't display return values from the server]" \
'(-d --display)'{-d,--display=}'[Tell the server to display the files on the given display]:display:_x_display' \
'--parent-id=[Open in parent window ID, via XEmbed]' \
'(-s --socket-name)'{-s,--socket-name=}'[Set filename of the UNIX socket for communication]: :_files' \
'(-f --server-file)'{-f,--server-file=}'[Set filename of the TCP authentication file]: :_files' \
'(-a --alternate-editor)'{-a,--alternate-editor=}'[Editor to fallback to if the server is not running if EDITOR is the empty string]:editor:_files' \
'(-T --tramp)'{-T,--tramp=}'[PREFIX to prepend to filenames sent by emacsclient for locating files remotely via Tramp]:prefix' \
'*:: :_files'
;;
esac
# 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
|
