diff options
| author | Michael Heerdegen | 2018-11-05 01:22:15 +0100 |
|---|---|---|
| committer | Michael Heerdegen | 2018-11-25 21:08:08 +0100 |
| commit | 1808d254a5820e8c650013033f800ca2990cd239 (patch) | |
| tree | dfb19b6117a4781351b17d35b9c404ea16d6e0bf /lisp/progmodes/ruby-mode.el | |
| parent | 3826ecc795ec2fc11d82432e1b55818c0e2ef685 (diff) | |
| download | emacs-1808d254a5820e8c650013033f800ca2990cd239.tar.gz emacs-1808d254a5820e8c650013033f800ca2990cd239.zip | |
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.
Diffstat (limited to 'lisp/progmodes/ruby-mode.el')
| -rw-r--r-- | lisp/progmodes/ruby-mode.el | 22 |
1 files changed, 11 insertions, 11 deletions
diff --git a/lisp/progmodes/ruby-mode.el b/lisp/progmodes/ruby-mode.el index 9256dfc17b5..2f68f004e7b 100644 --- a/lisp/progmodes/ruby-mode.el +++ b/lisp/progmodes/ruby-mode.el | |||
| @@ -586,12 +586,12 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 586 | 586 | ||
| 587 | (defun ruby-smie-rules (kind token) | 587 | (defun ruby-smie-rules (kind token) |
| 588 | (pcase (cons kind token) | 588 | (pcase (cons kind token) |
| 589 | (`(:elem . basic) ruby-indent-level) | 589 | ('(:elem . basic) ruby-indent-level) |
| 590 | ;; "foo" "bar" is the concatenation of the two strings, so the second | 590 | ;; "foo" "bar" is the concatenation of the two strings, so the second |
| 591 | ;; should be aligned with the first. | 591 | ;; should be aligned with the first. |
| 592 | (`(:elem . args) (if (looking-at "\\s\"") 0)) | 592 | ('(:elem . args) (if (looking-at "\\s\"") 0)) |
| 593 | ;; (`(:after . ",") (smie-rule-separator kind)) | 593 | ;; (`(:after . ",") (smie-rule-separator kind)) |
| 594 | (`(:before . ";") | 594 | ('(:before . ";") |
| 595 | (cond | 595 | (cond |
| 596 | ((smie-rule-parent-p "def" "begin" "do" "class" "module" "for" | 596 | ((smie-rule-parent-p "def" "begin" "do" "class" "module" "for" |
| 597 | "while" "until" "unless" | 597 | "while" "until" "unless" |
| @@ -638,12 +638,12 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 638 | ;; because we want to reject hanging tokens at bol, too. | 638 | ;; because we want to reject hanging tokens at bol, too. |
| 639 | (unless (or (eolp) (forward-comment 1)) | 639 | (unless (or (eolp) (forward-comment 1)) |
| 640 | (cons 'column (current-column))))) | 640 | (cons 'column (current-column))))) |
| 641 | (`(:before . " @ ") | 641 | ('(:before . " @ ") |
| 642 | (save-excursion | 642 | (save-excursion |
| 643 | (skip-chars-forward " \t") | 643 | (skip-chars-forward " \t") |
| 644 | (cons 'column (current-column)))) | 644 | (cons 'column (current-column)))) |
| 645 | (`(:before . "do") (ruby-smie--indent-to-stmt)) | 645 | ('(:before . "do") (ruby-smie--indent-to-stmt)) |
| 646 | (`(:before . ".") | 646 | ('(:before . ".") |
| 647 | (if (smie-rule-sibling-p) | 647 | (if (smie-rule-sibling-p) |
| 648 | (and ruby-align-chained-calls 0) | 648 | (and ruby-align-chained-calls 0) |
| 649 | (smie-backward-sexp ".") | 649 | (smie-backward-sexp ".") |
| @@ -651,7 +651,7 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 651 | ruby-indent-level)))) | 651 | ruby-indent-level)))) |
| 652 | (`(:before . ,(or "else" "then" "elsif" "rescue" "ensure")) | 652 | (`(:before . ,(or "else" "then" "elsif" "rescue" "ensure")) |
| 653 | (smie-rule-parent)) | 653 | (smie-rule-parent)) |
| 654 | (`(:before . "when") | 654 | ('(:before . "when") |
| 655 | ;; Align to the previous `when', but look up the virtual | 655 | ;; Align to the previous `when', but look up the virtual |
| 656 | ;; indentation of `case'. | 656 | ;; indentation of `case'. |
| 657 | (if (smie-rule-sibling-p) 0 (smie-rule-parent))) | 657 | (if (smie-rule-sibling-p) 0 (smie-rule-parent))) |
| @@ -668,7 +668,7 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 668 | (if (ruby-smie--indent-to-stmt-p token) | 668 | (if (ruby-smie--indent-to-stmt-p token) |
| 669 | (ruby-smie--indent-to-stmt) | 669 | (ruby-smie--indent-to-stmt) |
| 670 | (cons 'column (current-column))))) | 670 | (cons 'column (current-column))))) |
| 671 | (`(:before . "iuwu-mod") | 671 | ('(:before . "iuwu-mod") |
| 672 | (smie-rule-parent ruby-indent-level)) | 672 | (smie-rule-parent ruby-indent-level)) |
| 673 | )) | 673 | )) |
| 674 | 674 | ||
| @@ -756,9 +756,9 @@ It is used when `ruby-encoding-magic-comment-style' is set to `custom'." | |||
| 756 | The style of the comment is controlled by `ruby-encoding-magic-comment-style'." | 756 | The style of the comment is controlled by `ruby-encoding-magic-comment-style'." |
| 757 | (let ((encoding-magic-comment-template | 757 | (let ((encoding-magic-comment-template |
| 758 | (pcase ruby-encoding-magic-comment-style | 758 | (pcase ruby-encoding-magic-comment-style |
| 759 | (`ruby "# coding: %s") | 759 | ('ruby "# coding: %s") |
| 760 | (`emacs "# -*- coding: %s -*-") | 760 | ('emacs "# -*- coding: %s -*-") |
| 761 | (`custom | 761 | ('custom |
| 762 | ruby-custom-encoding-magic-comment-template)))) | 762 | ruby-custom-encoding-magic-comment-template)))) |
| 763 | (insert | 763 | (insert |
| 764 | (format encoding-magic-comment-template encoding) | 764 | (format encoding-magic-comment-template encoding) |