branch: elpa/helm commit 6d46846baa24247fa8237cb07a4d188b888a8dbb Author: Thierry Volpiatto <thie...@posteo.net> Commit: Thierry Volpiatto <thie...@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.