mirror of
git://git.sv.gnu.org/emacs.git
synced 2025-12-15 10:30:25 -08:00
Replace insignificant backquotes
Replace most insignificant occurrences of '`' with a straight quote, sharp quote or nothing. This includes backquotes in 'pcase' patterns. * admin/admin.el: * lisp/apropos.el: * lisp/arc-mode.el: * lisp/auth-source.el: * lisp/avoid.el: * lisp/bindings.el: * lisp/bs.el: * lisp/calculator.el: * lisp/calendar/todo-mode.el: * lisp/cedet/semantic.el: * lisp/cedet/semantic/analyze/debug.el: * lisp/cedet/semantic/bovine.el: * lisp/cedet/semantic/dep.el: * lisp/cedet/semantic/grammar.el: * lisp/cedet/semantic/wisent/comp.el: * lisp/cedet/semantic/wisent/grammar.el: * lisp/cedet/srecode/mode.el: * lisp/cus-edit.el: * lisp/doc-view.el: * lisp/elec-pair.el: * lisp/electric.el: * lisp/emacs-lisp/autoload.el: * lisp/emacs-lisp/benchmark.el: * lisp/emacs-lisp/byte-opt.el: * lisp/emacs-lisp/bytecomp.el: * lisp/emacs-lisp/cconv.el: * lisp/emacs-lisp/cl-extra.el: * lisp/emacs-lisp/cl-generic.el: * lisp/emacs-lisp/cl-macs.el: * lisp/emacs-lisp/copyright.el: * lisp/emacs-lisp/debug.el: * lisp/emacs-lisp/eieio-compat.el: * lisp/emacs-lisp/ert.el: * lisp/emacs-lisp/generator.el: * lisp/emacs-lisp/inline.el: * lisp/emacs-lisp/macroexp.el: * lisp/emacs-lisp/map.el: * lisp/emacs-lisp/package-x.el: * lisp/emacs-lisp/package.el: * lisp/emacs-lisp/radix-tree.el: * lisp/emacs-lisp/smie.el: * lisp/epa.el: * lisp/erc/erc-dcc.el: * lisp/erc/erc-track.el: * lisp/erc/erc.el: * lisp/eshell/em-ls.el: * lisp/eshell/esh-cmd.el: * lisp/files.el: * lisp/filesets.el: * lisp/font-lock.el: * lisp/frameset.el: * lisp/gnus/gnus-agent.el: * lisp/gnus/gnus-art.el: * lisp/gnus/gnus-cite.el: * lisp/gnus/gnus-group.el: * lisp/gnus/gnus-msg.el: * lisp/gnus/gnus-salt.el: * lisp/gnus/gnus-srvr.el: * lisp/gnus/gnus-sum.el: * lisp/gnus/gnus-topic.el: * lisp/gnus/gnus-util.el: * lisp/gnus/gnus.el: * lisp/gnus/message.el: * lisp/gnus/mm-util.el: * lisp/gnus/mml.el: * lisp/gnus/nnheader.el: * lisp/gnus/nnimap.el: * lisp/gnus/nnmairix.el: * lisp/gnus/spam.el: * lisp/hexl.el: * lisp/hi-lock.el: * lisp/ibuf-ext.el: * lisp/ibuffer.el: * lisp/ido.el: * lisp/info.el: * lisp/international/mule-cmds.el: * lisp/international/mule-util.el: * lisp/json.el: * lisp/jsonrpc.el: * lisp/language/cyrillic.el: * lisp/language/european.el: * lisp/language/georgian.el: * lisp/language/tibetan.el: * lisp/language/utf-8-lang.el: * lisp/language/vietnamese.el: * lisp/ldefs-boot.el: * lisp/mail/mail-extr.el: * lisp/man.el: * lisp/menu-bar.el: * lisp/mh-e/mh-acros.el: * lisp/mh-e/mh-folder.el: * lisp/mh-e/mh-mime.el: * lisp/mh-e/mh-show.el: * lisp/mh-e/mh-speed.el: * lisp/minibuffer.el: * lisp/mpc.el: * lisp/net/ange-ftp.el: * lisp/net/hmac-def.el: * lisp/net/newst-backend.el: * lisp/net/quickurl.el: * lisp/net/tramp-archive.el: * lisp/net/tramp-compat.el: * lisp/notifications.el: * lisp/obsolete/pgg-parse.el: * lisp/obsolete/vc-arch.el: * lisp/obsolete/xesam.el: * lisp/org/ob-C.el: * lisp/org/ob-core.el: * lisp/org/ob-exp.el: * lisp/org/ob-groovy.el: * lisp/org/ob-haskell.el: * lisp/org/ob-io.el: * lisp/org/ob-lisp.el: * lisp/org/ob-lob.el: * lisp/org/ob-lua.el: * lisp/org/ob-octave.el: * lisp/org/ob-perl.el: * lisp/org/ob-python.el: * lisp/org/ob-ref.el: * lisp/org/ob-ruby.el: * lisp/org/ob-sql.el: * lisp/org/org-agenda.el: * lisp/org/org-capture.el: * lisp/org/org-clock.el: * lisp/org/org-colview.el: * lisp/org/org-duration.el: * lisp/org/org-element.el: * lisp/org/org-entities.el: * lisp/org/org-gnus.el: * lisp/org/org-indent.el: * lisp/org/org-info.el: * lisp/org/org-inlinetask.el: * lisp/org/org-lint.el: * lisp/org/org-list.el: * lisp/org/org-mouse.el: * lisp/org/org-plot.el: * lisp/org/org-src.el: * lisp/org/org-table.el: * lisp/org/org.el: * lisp/org/ox-ascii.el: * lisp/org/ox-html.el: * lisp/org/ox-latex.el: * lisp/org/ox-man.el: * lisp/org/ox-md.el: * lisp/org/ox-org.el: * lisp/org/ox-publish.el: * lisp/org/ox-texinfo.el: * lisp/org/ox.el: * lisp/play/bubbles.el: * lisp/play/gamegrid.el: * lisp/progmodes/autoconf.el: * lisp/progmodes/cc-defs.el: * lisp/progmodes/cc-engine.el: * lisp/progmodes/cc-fonts.el: * lisp/progmodes/cc-langs.el: * lisp/progmodes/cperl-mode.el: * lisp/progmodes/ebrowse.el: * lisp/progmodes/elisp-mode.el: * lisp/progmodes/flymake-cc.el: * lisp/progmodes/flymake.el: * lisp/progmodes/fortran.el: * lisp/progmodes/grep.el: * lisp/progmodes/gud.el: * lisp/progmodes/idlwave.el: * lisp/progmodes/js.el: * lisp/progmodes/m4-mode.el: * lisp/progmodes/make-mode.el: * lisp/progmodes/mixal-mode.el: * lisp/progmodes/modula2.el: * lisp/progmodes/octave.el: * lisp/progmodes/opascal.el: * lisp/progmodes/prolog.el: * lisp/progmodes/ps-mode.el: * lisp/progmodes/python.el: * lisp/progmodes/ruby-mode.el: * lisp/progmodes/sh-script.el: * lisp/progmodes/sql.el: * lisp/progmodes/verilog-mode.el: * lisp/ps-mule.el: * lisp/rtree.el: * lisp/ruler-mode.el: * lisp/ses.el: * lisp/simple.el: * lisp/startup.el: * lisp/subr.el: * lisp/term/ns-win.el: * lisp/textmodes/bibtex.el: * lisp/textmodes/conf-mode.el: * lisp/textmodes/css-mode.el: * lisp/textmodes/refill.el: * lisp/textmodes/sgml-mode.el: * lisp/textmodes/tex-mode.el: * lisp/tutorial.el: * lisp/url/url-dav.el: * lisp/url/url-gw.el: * lisp/url/url-http.el: * lisp/url/url-methods.el: * lisp/url/url-privacy.el: * lisp/vc/cvs-status.el: * lisp/vc/diff-mode.el: * lisp/vc/ediff-init.el: * lisp/vc/ediff-ptch.el: * lisp/vc/log-edit.el: * lisp/vc/log-view.el: * lisp/vc/pcvs-info.el: * lisp/vc/pcvs.el: * lisp/vc/smerge-mode.el: * lisp/vc/vc-git.el: * lisp/vc/vc-hg.el: * lisp/vc/vc-mtn.el: * lisp/vc/vc-rcs.el: * lisp/whitespace.el: * lisp/window.el: * test/lisp/electric-tests.el: * test/lisp/emacs-lisp/cl-lib-tests.el: * test/lisp/emacs-lisp/ert-tests.el: * test/lisp/epg-tests.el: * test/lisp/jsonrpc-tests.el: * test/src/data-tests.el: * test/src/json-tests.el: Replace most insignificant backquotes.
This commit is contained in:
parent
3826ecc795
commit
1808d254a5
220 changed files with 1340 additions and 1349 deletions
|
|
@ -225,37 +225,37 @@ during a flush when the cache is given a new value of nil.")
|
|||
"Indicate that the current buffer is unparseable.
|
||||
It is also true that the parse tree will need either updating or
|
||||
a rebuild. This state will be changed when the user edits the buffer."
|
||||
`(setq semantic-parse-tree-state 'unparseable))
|
||||
'(setq semantic-parse-tree-state 'unparseable))
|
||||
|
||||
(defmacro semantic-parse-tree-unparseable-p ()
|
||||
"Return non-nil if the current buffer has been marked unparseable."
|
||||
`(eq semantic-parse-tree-state 'unparseable))
|
||||
'(eq semantic-parse-tree-state 'unparseable))
|
||||
|
||||
(defmacro semantic-parse-tree-set-needs-update ()
|
||||
"Indicate that the current parse tree needs to be updated.
|
||||
The parse tree can be updated by `semantic-parse-changes'."
|
||||
`(setq semantic-parse-tree-state 'needs-update))
|
||||
'(setq semantic-parse-tree-state 'needs-update))
|
||||
|
||||
(defmacro semantic-parse-tree-needs-update-p ()
|
||||
"Return non-nil if the current parse tree needs to be updated."
|
||||
`(eq semantic-parse-tree-state 'needs-update))
|
||||
'(eq semantic-parse-tree-state 'needs-update))
|
||||
|
||||
(defmacro semantic-parse-tree-set-needs-rebuild ()
|
||||
"Indicate that the current parse tree needs to be rebuilt.
|
||||
The parse tree must be rebuilt by `semantic-parse-region'."
|
||||
`(setq semantic-parse-tree-state 'needs-rebuild))
|
||||
'(setq semantic-parse-tree-state 'needs-rebuild))
|
||||
|
||||
(defmacro semantic-parse-tree-needs-rebuild-p ()
|
||||
"Return non-nil if the current parse tree needs to be rebuilt."
|
||||
`(eq semantic-parse-tree-state 'needs-rebuild))
|
||||
'(eq semantic-parse-tree-state 'needs-rebuild))
|
||||
|
||||
(defmacro semantic-parse-tree-set-up-to-date ()
|
||||
"Indicate that the current parse tree is up to date."
|
||||
`(setq semantic-parse-tree-state nil))
|
||||
'(setq semantic-parse-tree-state nil))
|
||||
|
||||
(defmacro semantic-parse-tree-up-to-date-p ()
|
||||
"Return non-nil if the current parse tree is up to date."
|
||||
`(null semantic-parse-tree-state))
|
||||
'(null semantic-parse-tree-state))
|
||||
|
||||
;;; Interfacing with the system
|
||||
;;
|
||||
|
|
|
|||
|
|
@ -558,19 +558,19 @@ PARENT is a possible parent (by nesting) tag."
|
|||
'mouse-face 'custom-button-pressed-face
|
||||
'tag tag
|
||||
'action
|
||||
`(lambda (button)
|
||||
(let ((buff nil)
|
||||
(pnt nil))
|
||||
(save-excursion
|
||||
(semantic-go-to-tag
|
||||
(button-get button 'tag))
|
||||
(setq buff (current-buffer))
|
||||
(setq pnt (point)))
|
||||
(if (get-buffer-window buff)
|
||||
(select-window (get-buffer-window buff))
|
||||
(pop-to-buffer buff t))
|
||||
(goto-char pnt)
|
||||
(pulse-line-hook-function)))
|
||||
(lambda (button)
|
||||
(let ((buff nil)
|
||||
(pnt nil))
|
||||
(save-excursion
|
||||
(semantic-go-to-tag
|
||||
(button-get button 'tag))
|
||||
(setq buff (current-buffer))
|
||||
(setq pnt (point)))
|
||||
(if (get-buffer-window buff)
|
||||
(select-window (get-buffer-window buff))
|
||||
(pop-to-buffer buff t))
|
||||
(goto-char pnt)
|
||||
(pulse-line-hook-function)))
|
||||
))
|
||||
(princ "\"")
|
||||
(princ str)
|
||||
|
|
|
|||
|
|
@ -72,7 +72,7 @@ The return list is a lambda expression to be used in a bovine table."
|
|||
"Return the current nonterminal symbol.
|
||||
Part of the grammar source debugger. Depends on the existing
|
||||
environment of `semantic-bovinate-stream'."
|
||||
`(if nt-stack
|
||||
'(if nt-stack
|
||||
(car (aref (car nt-stack) 2))
|
||||
nonterminal))
|
||||
|
||||
|
|
|
|||
|
|
@ -56,7 +56,7 @@ reparsed, the cache will be reset.
|
|||
TODO: use ffap.el to locate such items?
|
||||
|
||||
NOTE: Obsolete this, or use as special user")
|
||||
(make-variable-buffer-local `semantic-dependency-include-path)
|
||||
(make-variable-buffer-local 'semantic-dependency-include-path)
|
||||
|
||||
(defvar semantic-dependency-system-include-path nil
|
||||
"Defines the system include path.
|
||||
|
|
@ -71,7 +71,7 @@ When searching for a file associated with a name found in a tag of
|
|||
class include, this path will be inspected for includes of type
|
||||
`system'. Some include tags are agnostic to this setting and will
|
||||
check both the project and system directories.")
|
||||
(make-variable-buffer-local `semantic-dependency-system-include-path)
|
||||
(make-variable-buffer-local 'semantic-dependency-system-include-path)
|
||||
|
||||
(defmacro defcustom-mode-local-semantic-dependency-system-include-path
|
||||
(mode name value &optional docstring)
|
||||
|
|
|
|||
|
|
@ -1611,7 +1611,7 @@ Select the buffer containing the tag's definition, and move point there."
|
|||
;;
|
||||
|
||||
(defvar semantic-grammar-syntax-help
|
||||
`(
|
||||
'(
|
||||
;; Lexical Symbols
|
||||
("symbol" . "Syntax: A symbol of alpha numeric and symbol characters")
|
||||
("number" . "Syntax: Numeric characters.")
|
||||
|
|
|
|||
|
|
@ -196,11 +196,11 @@ If optional LEFT is non-nil insert spaces on left."
|
|||
(defmacro wisent-log-buffer ()
|
||||
"Return the log buffer.
|
||||
Its name is defined in constant `wisent-log-buffer-name'."
|
||||
`(get-buffer-create wisent-log-buffer-name))
|
||||
'(get-buffer-create wisent-log-buffer-name))
|
||||
|
||||
(defmacro wisent-clear-log ()
|
||||
"Delete the entire contents of the log buffer."
|
||||
`(with-current-buffer (wisent-log-buffer)
|
||||
'(with-current-buffer (wisent-log-buffer)
|
||||
(erase-buffer)))
|
||||
|
||||
(defvar byte-compile-current-file)
|
||||
|
|
|
|||
|
|
@ -194,7 +194,7 @@ See also the function `wisent-skip-block'."
|
|||
"Expand call to SKIP-TOKEN grammar macro.
|
||||
Return the form to skip the lookahead token.
|
||||
See also the function `wisent-skip-token'."
|
||||
`(wisent-skip-token))
|
||||
'(wisent-skip-token))
|
||||
|
||||
(defun wisent-grammar-assocs ()
|
||||
"Return associativity and precedence level definitions."
|
||||
|
|
|
|||
|
|
@ -89,14 +89,14 @@
|
|||
])
|
||||
"---"
|
||||
'( "Insert ..." :filter srecode-minor-mode-templates-menu )
|
||||
`( "Generate ..." :filter srecode-minor-mode-generate-menu )
|
||||
'( "Generate ..." :filter srecode-minor-mode-generate-menu )
|
||||
"---"
|
||||
(semantic-menu-item
|
||||
["Customize..."
|
||||
(customize-group "srecode")
|
||||
:active t
|
||||
:help "Customize SRecode options"
|
||||
])
|
||||
(semantic-menu-item
|
||||
["Customize..."
|
||||
(customize-group "srecode")
|
||||
:active t
|
||||
:help "Customize SRecode options"
|
||||
])
|
||||
(list
|
||||
"Debugging Tools..."
|
||||
(semantic-menu-item
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue