emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm 6d46846baa 2/2: Fix again warnings about single quote


From: ELPA Syncer
Subject: [nongnu] elpa/helm 6d46846baa 2/2: Fix again warnings about single quotes
Date: Tue, 7 Jun 2022 08:58:35 -0400 (EDT)

branch: elpa/helm
commit 6d46846baa24247fa8237cb07a4d188b888a8dbb
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix again warnings about single quotes
    
    Now avoid quoting things such as `foo' or "don't".
---
 helm-core.el     | 71 ++++++++++++++++++++++++++++----------------------------
 helm-elisp.el    |  2 +-
 helm-external.el |  2 +-
 helm-files.el    | 22 +++++++++---------
 helm-grep.el     | 26 ++++++++++-----------
 helm-imenu.el    |  4 ++--
 helm-lib.el      | 24 +++++++++----------
 helm-locate.el   |  6 ++---
 helm-misc.el     |  2 +-
 helm-mode.el     | 26 ++++++++++-----------
 helm-occur.el    |  2 +-
 helm-source.el   | 22 +++++++++---------
 helm-sys.el      | 16 ++++++-------
 helm-utils.el    |  2 +-
 14 files changed, 113 insertions(+), 114 deletions(-)

diff --git a/helm-core.el b/helm-core.el
index 7190dc0687..523105455c 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -74,7 +74,7 @@ E.g.
       (interactive)
       (message \"Run baz\"))
 
-\(helm-define-multi-key global-map (kbd \"<f5> q\") '(foo bar baz) 2)
+\(helm-define-multi-key global-map (kbd \"<f5> q\") \\='(foo bar baz) 2)
 
 Each time \"<f5> q\" is pressed, the next function is executed.
 Waiting more than 2 seconds between key presses switches back to
@@ -145,8 +145,8 @@ Arg OTHER-SUBKEYS is an alist specifying other short key 
bindings
 to use once started, e.g.:
 
     (helm-define-key-with-subkeys global-map
-       (kbd \"C-x v n\") ?n 'git-gutter:next-hunk
-       '((?p . git-gutter:previous-hunk))\)
+       (kbd \"C-x v n\") ?n \\='git-gutter:next-hunk
+       \\='((?p . git-gutter:previous-hunk))\)
 
 In this example, `C-x v n' will run `git-gutter:next-hunk'
 subsequent \"n\" will run this command again and subsequent \"p\"
@@ -455,7 +455,7 @@ To set it locally to `helm-buffer' in Helm sources use
   :type 'symbol)
 
 (defcustom helm-case-fold-search 'smart
-  "Adds 'smart' option to `case-fold-search'.
+  "Adds \\='smart' option to `case-fold-search'.
 Smart option ignores case for searches as long as there are no
 upper case characters in the pattern.
 
@@ -487,7 +487,7 @@ See `helm-case-fold-search' for more info."
   "Use the same state of window split, vertical or horizontal.
 `helm-toggle-resplit-window' for the next helm session will use
 the same window scheme as the previous session unless
-`helm-split-window-default-side' is 'same or 'other."
+`helm-split-window-default-side' is \\='same or \\='other."
   :group 'helm
   :type 'boolean)
 
@@ -521,7 +521,7 @@ handle this."
 
 (defcustom helm-split-window-other-side-when-one-window 'below
   "The default side to display `helm-buffer' when (1)
-`helm-split-window-default-side' is 'other and (2)
+`helm-split-window-default-side' is \\='other and (2)
 the current frame only has one window. Possible values
 are acceptable args for `split-window' SIDE, that is `below',
 `above', `left' or `right'.
@@ -580,7 +580,7 @@ in the other.
 
 Note: this has no effect when `helm-split-window-inside-p' is
 non-nil, or when `helm-split-window-default-side' is set to
-'same.
+\\='same.
 
 When `helm-autoresize-mode' is enabled, setting this to nil
 will have no effect.
@@ -762,7 +762,7 @@ The default is to enable this by default and then toggle
 This will be used when `helm-echo-input-in-header-line' is
 non-nil.
 
-Value can be one of the symbols 'left-fringe or 'left-margin or
+Value can be one of the symbols \\='left-fringe or \\='left-margin or
 an integer specifying the number of spaces before prompt.  Note
 that on input longer that `window-width' the continuation string
 will be shown on left side of window without taking care of
@@ -1114,10 +1114,9 @@ Should run also at end of `helm-display-function'.")
 
 (defvar helm-execute-action-at-once-if-one nil
   "When non-nil execute the default action and then exit if only one candidate.
-If symbol 'current-source is given as value exit if only one
+If symbol \\='current-source is given as value exit if only one
 candidate in current source.  This variable accepts a function
-with no args that should returns a boolean value or
-'current-source.")
+with no args that should returns a boolean value or \\='current-source.")
 
 (defvar helm-quit-if-no-candidate nil
   "When non-nil, quit if there are no candidates.
@@ -1155,7 +1154,7 @@ A hook useful for modifying minibuffer settings in Helm.
 An example that hides the minibuffer when using
 `helm-echo-input-in-header-line':
 
-      (add-hook 'helm-minibuffer-set-up-hook #'helm-hide-minibuffer-maybe)
+      (add-hook \\='helm-minibuffer-set-up-hook #'helm-hide-minibuffer-maybe)
 
 Note that we check `helm-echo-input-in-header-line' value
 from `helm-buffer' which allows detecting possible local
@@ -2084,7 +2083,7 @@ End:")
 If SRC is omitted, use current source.
 
 If COMPUTE is non-`nil' compute value of ATTRIBUTE-NAME with
-`helm-interpret-value'.  COMPUTE can have also 'ignorefn as value,
+`helm-interpret-value'.  COMPUTE can have also \\='ignorefn as value,
 in this case `helm-interpret-value' will return a function as
 value unchanged, but will eval a symbol which is bound.
 
@@ -2177,13 +2176,13 @@ without modifying source code.
 E.g.
 
 Add the action \"Byte compile file async\" linked to function
-'async-byte-compile-file to source `helm-source-find-files' only
+`async-byte-compile-file' to source `helm-source-find-files' only
 when predicate helm-ff-candidates-lisp-p returns non-nil:
 
 \(helm-add-action-to-source-if \"Byte compile file async\"
-                              'async-byte-compile-file
+                              \\='async-byte-compile-file
                               helm-source-find-files
-                              'helm-ff-candidates-lisp-p\)."
+                              \\='helm-ff-candidates-lisp-p\)."
   (let* ((actions     (helm-get-attr 'action source 'ignorefn))
          (action-transformers (helm-get-attr 'action-transformer source))
          (new-action  (list (cons name fn)))
@@ -2219,16 +2218,16 @@ only:
 
 Shift+F shows only file results from some sources:
 
-\(define-key helm-map \"F\" 'helm-my-show-files-only)
+\(define-key helm-map \"F\" \\='helm-my-show-files-only)
 
 \(defun helm-my-show-files-only ()
   (interactive)
-  (helm-set-source-filter '(\"File Name History\"
+  (helm-set-source-filter \\='(\"File Name History\"
                                   \"Files from Current Directory\")))
 
 Shift+A shows all results:
 
-\(define-key helm-map \"A\" 'helm-my-show-all)
+\(define-key helm-map \"A\" \\='helm-my-show-all)
 
 \(defun helm-my-show-all ()
   (interactive)
@@ -2431,7 +2430,7 @@ i.e. functions called with RET."
 (defun helm-interpret-value (value &optional source compute)
   "Interpret VALUE as variable, function or literal and return it.
 If VALUE is a function, call it with no arguments and return the value
-unless COMPUTE value is 'ignorefn.
+unless COMPUTE value is \\='ignorefn.
 If SOURCE compute VALUE for this source.
 If VALUE is a variable, return the value.
 If VALUE is a symbol, but it is not a function or a variable, cause an error.
@@ -2666,7 +2665,7 @@ Minibuffer prompt. Default value is `helm--prompt'.
 If t, allow resumption of the previous session of this Helm
 command, skipping initialization.
 
-If 'noresume, this instance of `helm' cannot be resumed.
+If \\='noresume, this instance of `helm' cannot be resumed.
 
 *** :preselect
 
@@ -2721,7 +2720,7 @@ Allow running this Helm command in a running Helm session.
 Other keywords are interpreted as local variables of this Helm
 session. The `helm-' prefix can be omitted. For example,
 
-\(helm :sources 'helm-source-buffers-list
+\(helm :sources \\='helm-source-buffers-list
        :buffer \"*helm buffers*\"
        :candidate-number-limit 10)
 
@@ -2791,7 +2790,7 @@ are valid helm variables nevertheless.  For example,
 :candidate-number-limit is bound to `helm-candidate-number-limit'
 in the source.
 
-  (helm-parse-keys '(:sources ((name . \"test\")
+  (helm-parse-keys \\='(:sources ((name . \"test\")
                                (candidates . (a b c)))
                      :buffer \"toto\"
                      :candidate-number-limit 4))
@@ -4556,7 +4555,7 @@ See `helm-fuzzy-default-highlight-match'."
   "Score STR candidate according to REGEXP.
 
 REGEXP should be generated from a pattern which is a list like
-\'(point \"f\" any \"o\" any \"b\" any) for \"fob\" as pattern.
+\\='(point \"f\" any \"o\" any \"b\" any) for \"fob\" as pattern.
 Such pattern may be build with
 `helm-completion--flex-transform-pattern' function, and the regexp
 with `completion-pcm--pattern->regex'.  For commodity,
@@ -5478,7 +5477,7 @@ If action buffer is selected, back to the Helm buffer."
 ;; Selection of candidates
 
 (defun helm-display-source-at-screen-top-maybe (unit)
-  "Display source at the top of screen when UNIT value is 'source.
+  "Display source at the top of screen when UNIT value is \\='source.
 Return nil for any other value of UNIT."
   (when (and helm-display-source-at-screen-top (eq unit 'source))
     (set-window-start (selected-window)
@@ -5486,7 +5485,7 @@ Return nil for any other value of UNIT."
 
 (defun helm-skip-noncandidate-line (direction)
   "Skip source header or candidates separator when going in DIRECTION.
-DIRECTION is either 'next or 'previous.
+DIRECTION is either \\='next or \\='previous.
 Same as `helm-skip-header-and-separator-line' but ensure point is
 moved to the right place when at bob or eob."
   (helm-skip-header-and-separator-line direction)
@@ -5495,7 +5494,7 @@ moved to the right place when at bob or eob."
 
 (defun helm-skip-header-and-separator-line (direction)
   "Skip source header or candidate separator when going to next/previous line.
-DIRECTION is either 'next or 'previous."
+DIRECTION is either \\='next or \\='previous."
   (let ((fn (cl-ecase direction
               (next 'eobp)
               (previous 'bobp))))
@@ -5700,7 +5699,7 @@ Key arg WHERE can be one of:
 Key arg DIRECTION can be one of:
  - previous
  - next
- - A source or a source name when used with :WHERE 'source."
+ - A source or a source name when used with :WHERE \\='source."
   (let ((move-func (cl-case where
                      (line (cl-ecase direction
                              (previous 'helm-move--previous-line-fn)
@@ -6023,10 +6022,10 @@ marking candidates."
 (defun helm-confirm-and-exit-minibuffer ()
   "Maybe ask for confirmation when exiting helm.
 It is similar to `minibuffer-complete-and-exit' adapted to Helm.
-If `minibuffer-completion-confirm' value is 'confirm, send
+If `minibuffer-completion-confirm' value is \\='confirm, send
 minibuffer confirm message and exit on next hit.  If
 `minibuffer-completion-confirm' value is t, don't exit and send
-message 'no match'."
+message \\='no match'."
   (interactive)
   (with-helm-alive-p
     (if (and (helm--updating-p)
@@ -6361,12 +6360,12 @@ E.g.:
      (helm-build-in-buffer-source \"test\"
        :init (lambda ()
                (helm-init-candidates-in-buffer
-                   'global '(foo foa fob bar baz))))
+                   \\='global \\='(foo foa fob bar baz))))
 
 A shortcut can be used to simplify:
 
      (helm-build-in-buffer-source \"test\"
-       :data '(foo foa fob bar baz))
+       :data \\='(foo foa fob bar baz))
 
 By default, Helm makes candidates by evaluating the candidates
 function, then narrows them by `string-match' for each candidate.
@@ -6673,9 +6672,9 @@ without looping again through the whole list.")
   "Register BUFFER-SPEC with DATA for a helm candidates-in-buffer session.
 
 Arg BUFFER-SPEC can be a `buffer-name' (stringp), a buffer-spec
-object \(bufferp), or a symbol, either 'local or 'global which is
+object \(bufferp), or a symbol, either \\='local or \\='global which is
 passed to `helm-candidate-buffer'.
-The most common usage of BUFFER-SPEC is 'global.
+The most common usage of BUFFER-SPEC is \\='global.
 
 Arg DATA can be either a list or a plain string.
 Returns the resulting buffer.
@@ -6851,7 +6850,7 @@ If N is positive enlarge, if negative narrow."
 
 (defun helm--get-window-side-state ()
   "Return the position of `helm-window' from `helm-current-buffer'.
-Possible values are 'left 'right 'below or 'above."
+Possible values are \\='left \\='right \\='below or \\='above."
   (let ((side-list '(left right below above)))
     (cl-loop for side in side-list
              thereis (and (equal (helm-window)
@@ -7540,7 +7539,7 @@ They are bound by default to 
\\[helm-follow-action-forward] and
 (defun helm-follow-execute-persistent-action-maybe (&optional delay)
   "Execute persistent action in mode `helm-follow-mode'.
 
-This happen after: DELAY or the 'follow-attr value of current
+This happen after: DELAY or the \\='follow-attr value of current
 source or `helm-follow-input-idle-delay' or
 `helm-input-idle-delay' secs."
   (let* ((src (helm-get-current-source))
diff --git a/helm-elisp.el b/helm-elisp.el
index 0fb51a9815..bdc9939fc6 100644
--- a/helm-elisp.el
+++ b/helm-elisp.el
@@ -56,7 +56,7 @@ This is used in macro `with-helm-show-completion'."
     callf callf2 cl-callf cl-callf2 fset
     fboundp fmakunbound symbol-function)
   "List of function where quoted function completion happen.
-E.g. give only function names after (funcall '."
+E.g. give only function names after (funcall \\='."
   :group 'helm-elisp
   :type '(repeat (choice symbol)))
 
diff --git a/helm-external.el b/helm-external.el
index c4b7cf4412..fcc4f7f704 100644
--- a/helm-external.el
+++ b/helm-external.el
@@ -39,7 +39,7 @@ This will be use with `format', so use something like 
\"wmctrl -xa %s\"."
 (defcustom helm-external-programs-associations nil
   "Alist to store externals programs associated with file extension.
 This variable overhide setting in .mailcap file.
-E.g.: '\(\(\"jpg\" . \"gqview\"\) (\"pdf\" . \"xpdf\"\)\) "
+E.g.: \\='\(\(\"jpg\" . \"gqview\"\) (\"pdf\" . \"xpdf\"\)\) "
   :type '(alist :key-type string :value-type string)
   :group 'helm-external)
 
diff --git a/helm-files.el b/helm-files.el
index 4b8757a229..d7acf0c3e0 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -150,7 +150,7 @@ This set `ffap-newfile-prompt'."
   :group 'helm-files)
 
 (defcustom helm-ff-avfs-directory "~/.avfs"
-  "The default avfs directory, usually '~/.avfs'.
+  "The default avfs directory, usually \\='~/.avfs'.
 When this is set you will be able to expand archive filenames
 with `C-j' inside an avfs directory mounted with mountavfs.
 See <http://sourceforge.net/projects/avf/>."
@@ -365,7 +365,7 @@ else."
   :type '(repeat symbol))
 
 (defcustom helm-ff-allow-recursive-deletes nil
-  "When 'always don't prompt for recursive deletion of directories.
+  "When \\='always don't prompt for recursive deletion of directories.
 When nil, will ask for recursive deletion.
 Note that when deleting multiple directories you can answer !
 when prompted to avoid being asked for next directories, so it
@@ -398,17 +398,17 @@ It is the function that will be used when using
   "Allow trashing remote files when non-nil.
 
 Trashing remote files with tramp doesn't work out of the box
-unless the 'trash-cli' package is installed.  This is why trashing
+unless the \\='trash-cli' package is installed.  This is why trashing
 remote files from Helm is disabled by default.
 
-Tramp is using external 'trash' command in its `delete-file' and
+Tramp is using external \\='trash' command in its `delete-file' and
 `delete-directory' handlers when using
 `delete-by-moving-to-trash', which is documented nowhere in
 Emacs.
 
-If you want to enable this you will have to install the 'trash'
+If you want to enable this you will have to install the \\='trash'
 command on remote (and/or locally if you want to trash as root).
-On Ubuntu-based distributions it is 'trash-cli'."
+On Ubuntu-based distributions it is \\='trash-cli'."
   :group 'helm-files
   :type 'boolean)
 
@@ -3526,7 +3526,7 @@ to nil to avoid error messages when using 
`helm-find-files'."
   "List contents of DIRECTORY.
 Argument FULL mean absolute path.
 It is same as `directory-files' but always returns the dotted
-filename '.' and '..' even on root directories in Windows
+filename \\='.' and \\='..' even on root directories in Windows
 systems.
 When FORCE-UPDATE is non nil recompute candidates even if DIRECTORY is
 in cache."
@@ -4209,7 +4209,7 @@ it from your init file, ensure to call it _after_ your 
defmethod's
   "Execute a trash action FN on marked files.
 
 Arg NAMES is a list of strings to pass to messages.
-E.g. '(\"delete\" \"deleting\")
+E.g. \\='(\"delete\" \"deleting\")
 
 ARGS are other arguments to be passed to FN."
   (let ((mkd (helm-marked-candidates))
@@ -4265,7 +4265,7 @@ ARGS are other arguments to be passed to FN."
 
 The Trash directory should be a directory compliant with
 <http://freedesktop.org/wiki/Specifications/trash-spec> and each
-file should have its '*.trashinfo' correspondent file in
+file should have its \\='*.trashinfo' correspondent file in
 Trash/info directory."
   (helm-ff-trash-action 'helm-ff-trash-rm-1 '("delete" "deleting")))
 
@@ -4289,7 +4289,7 @@ Trash/info directory."
 
 The Trash directory should be a directory compliant with
 <http://freedesktop.org/wiki/Specifications/trash-spec> and each
-file should have its '*.trashinfo' corresponding file in
+file should have its \\='*.trashinfo' corresponding file in
 Trash/info directory."
   (let* ((default-directory (file-name-as-directory
                              helm-ff-default-directory))
@@ -5428,7 +5428,7 @@ Find inside `require' and `declare-function' sexp."
                              &key action follow (files 
(dired-get-marked-files)))
   "Execute ACTION on FILES to DESTINATION.
 Where ACTION is a symbol that can be one of:
-'copy, 'rename, 'symlink,'relsymlink, 'hardlink or 'backup.
+'copy, \\='rename, \\='symlink,'relsymlink, \\='hardlink or \\='backup.
 Argument FOLLOW when non-nil specifies to follow FILES to
 DESTINATION for the actions copy and rename."
   (require 'dired-async)
diff --git a/helm-grep.el b/helm-grep.el
index c7fae927e5..e3ca06d0aa 100644
--- a/helm-grep.el
+++ b/helm-grep.el
@@ -58,19 +58,19 @@ Where:
      whether to use the -i option of grep. (Not mandatory)
      When you specify this spec, helm grep will use smartcase
      that is when a upcase character is found in pattern case will
-     be respected and no '-i' option will be used, otherwise, when
-     no upcase character is found in pattern always use '-i'.
+     be respected and no \\='-i' option will be used, otherwise, when
+     no upcase character is found in pattern always use \\='-i'.
      If you don't want this behavior, don't use this spec and
-     specify or not the '-i' option.
+     specify or not the \\='-i' option.
      Note that with ack-grep this is not needed, just specify
-     the '--smart-case' option.
+     the \\='--smart-case' option.
 
 '%p' format spec is for pattern.           (Mandatory)
 
 '%f' format spec is for filenames.         (Mandatory)
 
 If your grep version doesn't support the --exclude/include args
-don't specify the '%e' format spec.
+don't specify the \\='%e' format spec.
 
 Helm also support ack-grep and git-grep.  The following is a
 default command example for ack-grep:
@@ -153,10 +153,10 @@ GREP_COLORS env var."
 
 (defcustom helm-pdfgrep-default-read-command nil
   "Default command to read pdf files from pdfgrep.
-Where '%f' format spec is filename and '%p' is page number.
+Where \\='%f' format spec is filename and \\='%p' is page number.
 E.g. In Ubuntu you can set it to:
 
-    \"evince --page-label=%p '%f'\"
+    \"evince --page-label=%p \\='%f'\"
 
 If set to nil either `doc-view-mode' or `pdf-view-mode' will be
 used instead of an external command."
@@ -1059,7 +1059,7 @@ Special commands:
 
 (defvar helm-grep-ack-types-cache nil)
 (defun helm-grep-read-ack-type ()
-  "Select types for the '--type' argument of ack-grep."
+  "Select types for the \\='--type' argument of ack-grep."
   (require 'helm-mode)
   (require 'helm-adaptive)
   (setq helm-grep-ack-types-cache (helm-grep-hack-types))
@@ -1099,7 +1099,7 @@ of grep."
         finally return (delq nil (append ext-list glob-list))))
 
 (defun helm-grep-get-file-extensions (files)
-  "Try to return a list of file extensions to pass to '--include' arg of grep."
+  "Try to return a list of file extensions to pass to \\='--include' arg of 
grep."
   (require 'helm-adaptive)
   (let* ((all-exts (helm-grep-guess-extensions
                     (mapcar 'expand-file-name files)))
@@ -1169,7 +1169,7 @@ of grep."
                                   default-input input (source 
'helm-source-grep))
   "Launch helm using backend BACKEND on a list of TARGETS files.
 
-When RECURSE is given and BACKEND is 'grep' use -r option of
+When RECURSE is given and BACKEND is \\='grep' use -r option of
 BACKEND and prompt user for EXTS to set the --include args of
 BACKEND.
 Interactively you can give more than one arg separated by space
@@ -1186,8 +1186,8 @@ Argument DEFAULT-INPUT is use as `default' arg of `helm' 
and
 INPUT is used as `input' arg of `helm'.  See `helm' docstring.
 
 Arg BACKEND when non-nil specifies which backend to use.
-It is used actually to specify 'zgrep' or 'git'.
-When BACKEND 'zgrep' is used don't prompt for a choice in
+It is used actually to specify \\='zgrep' or \\='git'.
+When BACKEND \\='zgrep' is used don't prompt for a choice in
 recurse, and ignore EXTS, search being made recursively on files
 matching `helm-zgrep-file-extension-regexp' only."
   (let* (non-essential
@@ -1546,7 +1546,7 @@ For ripgrep here is the command line to use:
 
 And to customize colors (always for ripgrep) use something like this:
 
-    rg --color=always --colors 'match:bg:yellow' --colors 'match:fg:black'
+    rg --color=always --colors \\='match:bg:yellow' --colors 
\\='match:fg:black'
 \--smart-case --no-heading --line-number %s -- %s %s
 
 This will change color for matched items from foreground red (the
diff --git a/helm-imenu.el b/helm-imenu.el
index 71cbe29e24..36aa9780f2 100644
--- a/helm-imenu.el
+++ b/helm-imenu.el
@@ -53,8 +53,8 @@
   "Major mode association alist for `helm-imenu-in-all-buffers'.
 Allow `helm-imenu-in-all-buffers' searching in these associated
 buffers even if they are not derived from each other.  The alist
-is bidirectional, i.e. no need to add '((foo . bar) (bar . foo)),
-only '((foo . bar)) is needed."
+is bidirectional, i.e. no need to add \\='((foo . bar) (bar . foo)),
+only \\='((foo . bar)) is needed."
   :type '(alist :key-type symbol :value-type symbol)
   :group 'helm-imenu)
 
diff --git a/helm-lib.el b/helm-lib.el
index 5d98e333af..7a85e16cd4 100644
--- a/helm-lib.el
+++ b/helm-lib.el
@@ -811,7 +811,7 @@ See `helm-help-hkmap' for supported keys and functions."
   "Return a list of all single elements of sublists in SEQ.
 
     Example:
-    (helm-flatten-list '(1 (2 . 3) nil (4 5 (6) 7) 8 (9 . 10)))
+    (helm-flatten-list \\='(1 (2 . 3) nil (4 5 (6) 7) 8 (9 . 10)))
     => (1 2 3 4 5 6 7 8 9 10)"
   (let (result)
     (cl-labels ((flatten
@@ -924,9 +924,9 @@ hashtable itself."
 
 ARGS is (cand1 cand2 ...) or ((disp1 . real1) (disp2 . real2) ...)
 
-\(helm-transform-mapcar 'upcase '(\"foo\" \"bar\"))
+\(helm-transform-mapcar \\='upcase \\='(\"foo\" \"bar\"))
 => (\"FOO\" \"BAR\")
-\(helm-transform-mapcar 'upcase '((\"1st\" . \"foo\") (\"2nd\" . \"bar\")))
+\(helm-transform-mapcar \\='upcase \\='((\"1st\" . \"foo\") (\"2nd\" . 
\"bar\")))
 => ((\"1st\" . \"FOO\") (\"2nd\" . \"BAR\"))
 "
   (cl-loop for arg in args
@@ -1001,9 +1001,9 @@ Items not matching FUNCTION are grouped as well in a 
separate group.
 
 Example:
 
-    (setq B '(1 2 3 4 5 6 7 8 9))
+    (setq B \\='(1 2 3 4 5 6 7 8 9))
 
-    (helm-group-candidates-by B #'cl-oddp 2 'separate)
+    (helm-group-candidates-by B #'cl-oddp 2 \\='separate)
     => ((2 4 6 8) (1 3 5 7 9))
 
 SELECTION specify where to start in CANDIDATES.
@@ -1029,9 +1029,9 @@ otherwise a plain list is returned."
 
 Examples:
 
-    (helm-reorganize-sequence-from-elm '(a b c d e f g h i j k l) 'e)
+    (helm-reorganize-sequence-from-elm \\='(a b c d e f g h i j k l) \\='e)
     => (f g h i j k l a b c d e)
-    (helm-reorganize-sequence-from-elm '(a b c d e f g h i j k l) 'e t)
+    (helm-reorganize-sequence-from-elm \\='(a b c d e f g h i j k l) \\='e t)
     => (d c b a l k j i h g f e)
 "
   (let* ((new-seq  (if reverse
@@ -1119,11 +1119,11 @@ function with SUBEXP specified.
 E.g.:
 
     (helm--replace-regexp-in-buffer-string
-     \"e\\\\(m\\\\)acs\" 'upcase \"emacs\" t nil 1)
+     \"e\\\\(m\\\\)acs\" \\='upcase \"emacs\" t nil 1)
     => \"eMacs\"
 
     (replace-regexp-in-string
-     \"e\\\\(m\\\\)acs\" 'upcase \"emacs\" t nil 1)
+     \"e\\\\(m\\\\)acs\" \\='upcase \"emacs\" t nil 1)
     => \"eEMACSacs\"
 
 Also START argument behaves as expected unlike
@@ -1185,7 +1185,7 @@ Example:
 
     (let ((answer (helm-read-answer
                     \"answer [y,n,!,q]: \"
-                    '(\"y\" \"n\" \"!\" \"q\"))))
+                    \\='(\"y\" \"n\" \"!\" \"q\"))))
       (pcase answer
           (\"y\" \"yes\")
           (\"n\" \"no\")
@@ -1728,8 +1728,8 @@ Example:
 
     (helm :sources (helm-build-sync-source \"test\"
                      :candidates (helm-dynamic-completion
-                                  '(foo bar baz foab)
-                                  'symbolp)
+                                  \\='(foo bar baz foab)
+                                  \\='symbolp)
                      :match-dynamic t)
           :buffer \"*helm test*\")
 
diff --git a/helm-locate.el b/helm-locate.el
index 534df279ed..a38e6e1625 100644
--- a/helm-locate.el
+++ b/helm-locate.el
@@ -91,7 +91,7 @@ space is detected in pattern)."
 (defcustom helm-locate-case-fold-search helm-case-fold-search
   "It have the same meaning as `helm-case-fold-search'.
 The -i option of locate will be used depending of value of
-`helm-pattern' when this is set to 'smart.
+`helm-pattern' when this is set to \\='smart.
 When nil \"-i\" will not be used at all and when non-nil it will
 always be used.
 NOTE: the -i option of the \"es\" command used on windows does
@@ -176,7 +176,7 @@ It should receive the same arguments as
 Prefix arg LOCALDB when (4) search and use a local locate db file
 when it exists or create it, when (16) force update of existing
 db file even if exists.
-It has no effect when locate command is 'es'.  INIT is a string
+It has no effect when locate command is \\='es'.  INIT is a string
 to use as initial input in prompt.
 See `helm-locate-with-db' and `helm-locate'."
   (require 'helm-mode)
@@ -451,7 +451,7 @@ With a prefix arg refresh the database in each project."
 (defun helm-locate (arg)
   "Preconfigured `helm' for Locate.
 Note: you can add locate options after entering pattern.
-See 'man locate' for valid options and also `helm-locate-command'.
+See \\='man locate' for valid options and also `helm-locate-command'.
 
 You can specify a local database with prefix argument ARG.
 With two prefix arg, refresh the current local db or create it if
diff --git a/helm-misc.el b/helm-misc.el
index 5686aa046c..fee7a440ac 100644
--- a/helm-misc.el
+++ b/helm-misc.el
@@ -198,7 +198,7 @@ It is added to `extended-command-history'.
     map))
 
 (defcustom helm-minibuffer-history-must-match t
-  "Allow inserting non matching elements when nil or 'confirm."
+  "Allow inserting non matching elements when nil or \\='confirm."
   :group 'helm-misc
   :type '(choice
           (const :tag "Must match" t)
diff --git a/helm-mode.el b/helm-mode.el
index a6e5377e8e..4503d5f5c4 100644
--- a/helm-mode.el
+++ b/helm-mode.el
@@ -72,7 +72,7 @@ a `read-file-name' we may want to specify a handler for both 
of them,
 this can be done by specifying value as a list of two symbols instead of
 a single symbol where the 1st element of the list specify the handler for the
 `completing-read' and the second the handler for the `read-file-name'.
-Special symbol 'default' means use the default helm handler for either
+Special symbol \\='default' means use the default helm handler for either
 `completing-read' or `read-file-name'.
 e.g. (write-region . (default helm-read-file-name-handler-1))
 means helm will use `helm-completing-read-default-handler' when
@@ -101,7 +101,7 @@ Example:
 
     (defun foo/test ()
       (interactive)
-      (message \"%S\" (completing-read \"test: \" '(a b c d e))))
+      (message \"%S\" (completing-read \"test: \" \\='(a b c d e))))
 
     (defun helm-foo/test-completing-read-handler (prompt collection
                                                   predicate require-match
@@ -112,8 +112,8 @@ Example:
                                         :name name
                                         :buffer buffer))
 
-    (add-to-list 'helm-completing-read-handlers-alist
-                 '(foo/test . helm-foo/test-completing-read-handler))
+    (add-to-list \\='helm-completing-read-handlers-alist
+                 \\='(foo/test . helm-foo/test-completing-read-handler))
 
 
 We want here to make the regular `completing-read' in `foo/test'
@@ -134,7 +134,7 @@ If you want to disable helm completion for 
`describe-function', use:
     (describe-function . nil)
 
 Ido is also supported, you can use `ido-completing-read' and
-`ido-read-file-name' as value of an entry or just 'ido.
+`ido-read-file-name' as value of an entry or just \\='ido.
 Example:
 Enable ido completion for `find-file':
 
@@ -274,7 +274,7 @@ the `completing-read' using the default handler
 i.e. `helm-completing-read-default-handler'.
 
 NB: This has nothing to do with `completion-styles', it is independent from
-helm, but when using 'emacs as helm-completion-style helm
+helm, but when using \\='emacs as helm-completion-style helm
 will use the `completion-styles' for its completions.
 Up to the user to configure `completion-styles'.
 
@@ -293,8 +293,8 @@ There are three possible values to use:
   similar to `flex' and helm fuzzy matching.
 
 For a better experience with emacs style, if you don't know what to use, set
-`completion-styles' to '(flex) if you are using emacs-27 or to
-\'(helm-flex) if you are using emacs-26 and keep 'emacs as default
+`completion-styles' to \\='(flex) if you are using emacs-27 or to
+\'(helm-flex) if you are using emacs-26 and keep \\='emacs as default
 value for `helm-completion-style'.  Advanced users can also have a
 look to `completion-category-overrides' to set styles according to category.
 You can as well use `helm-completion-styles-alist' to override
@@ -337,7 +337,7 @@ suitable value for `helm-completion-style'.
 When specifying emacs as style for a mode, `completion-styles' can be
 specified by using a cons cell specifying completion-styles to use
 with helm emacs style, e.g. (foo-mode . (emacs helm flex)) will set
-`completion-styles' to '(helm flex) for foo-mode.  This affects only
+`completion-styles' to \\='(helm flex) for foo-mode.  This affects only
 completions happening in buffers and not minibuffer completions,
 i.e. completing-read's."
   :group 'helm-mode
@@ -363,7 +363,7 @@ Use this ONLY in `let', NOT globally, this allows third 
party packages
 to use a list as return value when `helm-mode' is enabled, e.g.
 
     (let ((helm-comp-read-use-marked t))
-      (completing-read \"test: \" '(a b c d e f g)))
+      (completing-read \"test: \" \\='(a b c d e f g)))
 
 ")
 
@@ -399,7 +399,7 @@ so we return the alist as it is with no transformation by
 
 e.g
 
-\(setq A '((a . 1) (b . 2) (c . 3)))
+\(setq A \\='((a . 1) (b . 2) (c . 3)))
 ==>((a . 1) (b . 2) (c . 3))
 \(helm-comp-read \"test: \" A :alistp nil
                               :exec-when-only-one t
@@ -1312,7 +1312,7 @@ Keys description:
 
 - BUFFER: `helm-buffer' name, defaults to \"*Helm Completions*\".
 
-- TEST: A predicate called with one arg 'candidate'.
+- TEST: A predicate called with one arg \\='candidate'.
 
 - NORET: Allow disabling helm-ff-RET (have no effect if helm-ff-RET
                                       isn't bound to RET).
@@ -1323,7 +1323,7 @@ Keys description:
 
 - HISTORY: Display HISTORY in a special source.
 
-- MUST-MATCH: Can be 'confirm, nil, or t.
+- MUST-MATCH: Can be \\='confirm, nil, or t.
 
 - FUZZY: Enable fuzzy matching when non-nil (Enabled by default).
 
diff --git a/helm-occur.el b/helm-occur.el
index 38784b5108..9fccfcdd96 100644
--- a/helm-occur.el
+++ b/helm-occur.el
@@ -595,7 +595,7 @@ persistent action."
 
 (defun helm-occur-buffer-substring-with-linums ()
   "Return current-buffer contents as a string with all lines
-numbered.  The property 'buffer-name is added to the whole string."
+numbered.  The property \\='buffer-name is added to the whole string."
   (let ((bufstr (buffer-substring-no-properties (point-min) (point-max)))
         (bufname (buffer-name)))
     (with-temp-buffer
diff --git a/helm-source.el b/helm-source.el
index 8516cec88f..35d22c57fc 100644
--- a/helm-source.el
+++ b/helm-source.el
@@ -187,9 +187,9 @@
     (defun foo-persistent-action (candidate)
        (do-something candidate))
 
-    :persistent-action '(foo-persistent-action . never-split) ; Don't split
+    :persistent-action \\='(foo-persistent-action . never-split) ; Don't split
   or
-    :persistent-action 'foo-persistent-action ; Split
+    :persistent-action \\='foo-persistent-action ; Split
 
   When specifying :persistent-action by slot directly, foo-persistent-action
   will be executed without quitting helm when hitting `C-j'.
@@ -205,8 +205,8 @@
        \"Delete current candidate without quitting.\"
        (interactive)
        (with-helm-alive-p
-         (helm-set-attr 'quick-delete '(helm-ff-quick-delete . never-split))
-         (helm-execute-persistent-action 'quick-delete)))
+         (helm-set-attr \\='quick-delete \\='(helm-ff-quick-delete . 
never-split))
+         (helm-execute-persistent-action \\='quick-delete)))
 
   This function is then bound in `helm-find-files-map'.")
 
@@ -225,13 +225,13 @@
               ;; Don't split helm-window.
               (cons (lambda (_ignore)
                       (do-something candidate))
-                    'no-split))
+                    \\='no-split))
              ;; Split helm-window.
              (something-else
               (lambda (_ignore)
                 (do-something-else candidate)))))
 
-     :persistent-action-if 'foo-persistent-action
+     :persistent-action-if \\='foo-persistent-action
 
   Here when hitting `C-j' one of the lambda's will be executed
   depending on something or something-else condition, splitting or not
@@ -363,7 +363,7 @@
   Example:
 
     (helm :sources (helm-build-sync-source \"test\"
-                 :candidates '(a b c d e)
+                 :candidates \\='(a b c d e)
                  :display-to-real (lambda (c) (concat c \":modified by 
d-t-r\")))
       :buffer \"*helm test*\")
 
@@ -384,7 +384,7 @@
   Example:
 
     (helm :sources (helm-build-sync-source \"test\"
-                 :candidates '((\"foo\" . 1) (\"bar\" . 2) (\"baz\". 3))
+                 :candidates \\='((\"foo\" . 1) (\"bar\" . 2) (\"baz\". 3))
                  :real-to-display (lambda (c) (format \"%s\" (1+ c))))
       :buffer \"*helm test*\")
 
@@ -397,7 +397,7 @@
     :documentation
     "  Get candidates with their properties in `helm-marked-candidates'.
   Allow using the FORCE-DISPLAY-PART of `helm-get-selection' in marked
-  candidates, use t or 'withprop to pass it to `helm-get-selection'.")
+  candidates, use t or \\='withprop to pass it to `helm-get-selection'.")
 
    (action-transformer
     :initarg :action-transformer
@@ -723,7 +723,7 @@
     :custom boolean
     :documentation
     "  Enable migemo.
-  When multimatch is disabled, you can give the symbol 'nomultimatch as value
+  When multimatch is disabled, you can give the symbol \\='nomultimatch as 
value
   to force not using generic migemo matching function.
   In this case you have to provide your own migemo matching funtion
   that kick in when `helm-migemo-mode' is enabled.
@@ -811,7 +811,7 @@ inherit from `helm-source'.")
     :custom boolean
     :documentation
     "  Enable migemo.
-  When multimatch is disabled, you can give the symbol 'nomultimatch as value
+  When multimatch is disabled, you can give the symbol \\='nomultimatch as 
value
   to force not using generic migemo matching function.
   In this case you have to provide your own migemo matching funtion
   that kick in when `helm-migemo-mode' is enabled.
diff --git a/helm-sys.el b/helm-sys.el
index 85a3888ebe..fcd36583e4 100644
--- a/helm-sys.el
+++ b/helm-sys.el
@@ -41,20 +41,20 @@
   "Top command used to display output of top.
 A format string where %s will be replaced with `frame-width'.
 
-To use 'top' command, a version supporting batch mode (-b option)
-is needed. On Mac OSX 'top' command doesn't support this, so the
+To use \\='top' command, a version supporting batch mode (-b option)
+is needed. On Mac OSX \\='top' command doesn't support this, so the
 'ps' command is used instead by default.
 
-Normally 'top' command output have 12 columns, but in some
+Normally \\='top' command output have 12 columns, but in some
 versions you may have less than this, so you can either customize
-top to use 12 columns with the interactives 'f' and 'W' commands
+top to use 12 columns with the interactives \\='f' and \\='W' commands
 of top, or modify `helm-top-sort-columns-alist' to fit with the
-number of columns your 'top' command is using.
+number of columns your \\='top' command is using.
 
-If you modify 'ps' command be sure that 'pid' comes in first and
+If you modify \\='ps' command be sure that \\='pid' comes in first and
 \"env COLUMNS=%s\" is specified at beginning of command. Ensure
 also that no elements contain spaces (e.g., use start_time and
-not start). Same as for 'top': you can customize
+not start). Same as for \\='top': you can customize
 `helm-top-sort-columns-alist' to make sort commands working
 properly according to your settings."
   :group 'helm-sys
@@ -87,7 +87,7 @@ being idle."
 
 (defcustom helm-top-poll-preselection 'linum
   "Stay on same line or follow candidate when `helm-top-poll' updates display.
-Possible values are 'candidate or 'linum.
+Possible values are \\='candidate or \\='linum.
 This affects also sorting functions in the same way."
   :group'helm-sys
   :type '(radio :tag "Preferred preselection action for helm-top"
diff --git a/helm-utils.el b/helm-utils.el
index 2d91de31e7..10e7ed46de 100644
--- a/helm-utils.el
+++ b/helm-utils.el
@@ -719,7 +719,7 @@ Availables keys are:
 - GID-CHANGE: See nth 9 `files-attributes'.
 - INODE: See nth 10 `files-attributes'.
 - DEVICE-NUM: See nth 11 `files-attributes'.
-- DIRED: A line similar to what 'ls -l' return.
+- DIRED: A line similar to what \\='ls -l' return.
 - HUMAN-SIZE: The size in human form, see `helm-file-human-size'.
 - MODE-TYPE, mode-owner,mode-group, mode-other: Split what
   nth 7 `files-attributes' return in four categories.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]