From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Kaushal Modi Newsgroups: gmane.emacs.bugs Subject: bug#27789: 26.0.50; grep-apply-setting: wrong-type-argument consp nil Date: Sat, 22 Jul 2017 04:03:59 +0000 Message-ID: NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: multipart/alternative; boundary="001a1142bfbeebb4f70554e01282" X-Trace: blaine.gmane.org 1500696320 19637 195.159.176.226 (22 Jul 2017 04:05:20 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Sat, 22 Jul 2017 04:05:20 +0000 (UTC) To: 27789@debbugs.gnu.org, npostavs@gmail.com Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Sat Jul 22 06:05:10 2017 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dYlf9-0004Ry-3H for geb-bug-gnu-emacs@m.gmane.org; Sat, 22 Jul 2017 06:05:07 +0200 Original-Received: from localhost ([::1]:45634 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dYlfE-0000gg-Qp for geb-bug-gnu-emacs@m.gmane.org; Sat, 22 Jul 2017 00:05:12 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:57586) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dYlf7-0000ef-98 for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:05:08 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dYlf4-0006vJ-29 for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:05:05 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:49095) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dYlf3-0006v6-Ua for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:05:01 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1dYlf3-0000Db-NC for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:05:01 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Kaushal Modi Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Sat, 22 Jul 2017 04:05:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 27789 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: "bug-gnu-emacs@gnu.org" , Noam Postavsky Original-Received: via spool by submit@debbugs.gnu.org id=B.1500696270793 (code B ref -1); Sat, 22 Jul 2017 04:05:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 22 Jul 2017 04:04:30 +0000 Original-Received: from localhost ([127.0.0.1]:51772 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dYleX-0000Ci-EP for submit@debbugs.gnu.org; Sat, 22 Jul 2017 00:04:30 -0400 Original-Received: from eggs.gnu.org ([208.118.235.92]:38263) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1dYleV-0000CW-44 for submit@debbugs.gnu.org; Sat, 22 Jul 2017 00:04:28 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dYleN-0006RJ-7N for submit@debbugs.gnu.org; Sat, 22 Jul 2017 00:04:22 -0400 Original-Received: from lists.gnu.org ([2001:4830:134:3::11]:49896) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1dYleN-0006R1-3F for submit@debbugs.gnu.org; Sat, 22 Jul 2017 00:04:19 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:57465) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1dYleK-0000d2-1b for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:04:18 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1dYleG-0006N1-PW for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:04:16 -0400 Original-Received: from mail-lf0-x22a.google.com ([2a00:1450:4010:c07::22a]:37695) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1dYleG-0006MT-7u for bug-gnu-emacs@gnu.org; Sat, 22 Jul 2017 00:04:12 -0400 Original-Received: by mail-lf0-x22a.google.com with SMTP id m86so22100227lfi.4 for ; Fri, 21 Jul 2017 21:04:12 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20161025; h=mime-version:from:date:message-id:subject:to; bh=RBArmQYOGURR7WHUBcNaP7gTUoKHcghzzWbh7PHuT+E=; b=ACAeVMN8Ic1sUzjSIyEqT8AUY8iH+OBtJXBMovhihVUR16gx8c5ysJMIfHtPFt9wVH TIbI9J4RlcpK8fkOdjKDGFA6Q0LMz7IaiEmzTDWWvKynMMslU/EASHsxyGijFaazkkvU 8DPD8L83Mu5uoMAzhDiI/fLOXnyObPc+EErGx3ghanMQHRTSNfOatS1RpHbPOgZSRJgh gG4TZYvNO44iTE7Jx4+mCS8QH/Aws5gqckpjyczf+ZgHrb55GUaxkehrETnwZuGUcR9V y1dyGWKUO8gkK5xwvSyJYRr5DYAN2UczZJznn6ye47G1BnZSBD/88hHwleHaip0wup4c MDwA== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20161025; h=x-gm-message-state:mime-version:from:date:message-id:subject:to; bh=RBArmQYOGURR7WHUBcNaP7gTUoKHcghzzWbh7PHuT+E=; b=gBdM09L8LHJo+JH7AUDjpaedjHaCbnkRu2u9WqtdHh7lZzQxKa6ZbsOKiZorqW66jL 8+oNnAVB2EMlkKaYkfjbbwBQemxt0sdH80i/H4xBba5/yIV3qnbqA2DbqmuO1bPHjslY E+qYP/op0oEuv/shvnpv8P1UlNP/MVLB6AClMbpKEheDPQMa5/ssgD+AmRk6u2fruhJ/ R8yoVTMwXMBbEHFd/0mi4OIMwhKCAl1xzBbPKOvAYyRftDyi7+wm9zDjKt2XDWobRkyj Of9GvvmAF5CBITIBmtB4Z6RY/f4+Hv9KZLL+FkmPYcB7jzEa+q2mqP+uh495juLXR85I 6Q8w== X-Gm-Message-State: AIVw11067qYvTNWTRNTCp7rz5gU/BHkpF4lXL0j1t6x4Ox0JIGzPgjjA key+sBilqLfkugyuCF+C87L5HV1L3g== X-Received: by 10.46.0.20 with SMTP id 20mr415744lja.68.1500696250396; Fri, 21 Jul 2017 21:04:10 -0700 (PDT) X-detected-operating-system: by eggs.gnu.org: Genre and OS details not recognized. X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: "bug-gnu-emacs" Xref: news.gmane.org gmane.emacs.bugs:134840 Archived-At: --001a1142bfbeebb4f70554e01282 Content-Type: text/plain; charset="UTF-8" Content-Transfer-Encoding: quoted-printable Hello, I believe I started seeing this error after this commit[1]. I get the error when attempting to use ag search from ag.el[2]. =3D=3D=3D=3D=3D Debugger entered--Lisp error: (wrong-type-argument consp nil) grep-apply-setting(grep-use-null-filename-separator t) custom-initialize-reset(grep-use-null-filename-separator (funcall (function #f(compiled-function () #)))) custom-declare-variable(grep-use-null-filename-separator (funcall (function #f(compiled-function () #))) "If non-nil, use `grep's `--null' option.\nThis is done to disambiguate file names in `grep's output." :type (choice (const :tag "Do Not Use `--null'" nil) (const :tag "Use `--null'" t) (other :tag "Not Set" auto-detect)) :set grep-apply-setting :group grep) byte-code("\300\301\302\303\304DD\305\306\307\310\311\312\313&\011\210\300\= 314\302\303\315DD\316\306\317\320\321\310\311\312\313&\013\210\300\322\302\= 303\323DD\324\306\325\310\311\312\313&\011\210\300\326\302\303\327DD\330\30= 6\331\320\321\312\313&\011\210\300\332\302\303\333DD\334\306\335\320\321\31= 0\311\312\313&\013\210\300\336\302\303\337DD\340\306\341\320\321\312\313&\0= 11\210\300\342\302\303\343DD\344\306\345\320\321\312\313&\011\210\300\346\3= 02\303\347DD\350\306\351\320\321\312\313&\011\210\300\352\302\303\353DD\354= \306\355\320\321\310\311\312\313&\013\210\300\356\302\303\357DD\360\306\361= \312\313&\007\210\300\362\302\303\363DD\364\306\365\312\313&\007\210\300\36= 6\302\303\367DD\370\306\371\312\313&\007\210\300\372\302\303\373DD\374\310\= 375\306\376\312\313&\011\210\300\377\302\303\201@\0\ DD\201A\0\306\201B\0\310\311\312\313&\011\210\300\201C\0\302\303\201D\0\ DD\201E\0\306\201F\0\312\313&\007\207" [custom-declare-variable grep-window-height funcall function #f(compiled-function () #) "Number of lines in a grep window. If nil, use `compilation-window-height'." :type (choice (const :tag "Default" nil) integer) :version "22.1" :group grep grep-highlight-matches #f(compiled-function () #) "Use special markers to highlight grep matches.\n\nSome grep programs are able to surround matches with special\nmarkers in grep output. Such markers can be used to highlight\nmatches in grep mode. This requires `font-lock-mode' to be active\nin grep buffers, so if you have globally disabled font-lock-mode,\nyou will not get highlighting.\n\nThis option sets the environment variable GREP_COLORS to specify\nmarkers for highlighting and adds the --color option in front of\nany explicit grep options before starting the grep.\n\nWhen this option is `auto', grep uses `--color' to highlight\nmatches only when it outputs to a terminal (when `grep' is the last\ncommand in the pipe), thus avoiding the use of any potentially-harmful\nescape sequences when standard output goes to a file or pipe.\n\nTo make grep highlight matches even into a pipe, you need the option\n`always' that forces grep to use `--color=3Dalways' to unconditionally\noutput escape sequences.\n\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults' when the default value is `auto-detect'.\nTo change the default value, use Customize or call the function\n`grep-apply-setting'." (choice (const :tag "Do not highlight matches with grep markers" nil) (const :tag "Highlight matches with grep markers" t) (const :tag "Use --color=3Dalways" always) (const :tag "Use --color" auto) (other :tag "Not Set" auto-detect)) :set grep-apply-setting grep-scroll-output #f(compiled-function () #) "Non-nil to scroll the *grep* buffer window as output appears.\n\nSetting it causes the grep commands to put point at the end of their\noutput window so that the end of the output is always visible rather\nthan the beginning." boolean grep-command #f(compiled-function () #) "The default grep command for \\[grep].\nIf the grep program used supports an option to always include file names\nin its output (such as the `-H' option to GNU grep), it's a good idea to\ninclude it when specifying `grep-command'.\n\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults'; to change the default value, use\nCustomize or call the function `grep-apply-setting'." (choice string (const :tag "Not Set" nil)) grep-template #f(compiled-function () #) "The default command to run for \\[lgrep].\nThe following place holders should be present in the string:\n - place to put the options like -i and --color.\n - file names and wildcards to search.\n - file names and wildcards to exclude.\n - the regular expression searched for.\n - place to insert null-device.\n\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults'; to change the default value, use\nCustomize or call the function `grep-apply-setting'." (choice string (const :tag "Not Set" nil)) grep-use-null-device #f(compiled-function () #) "If t, append the value of `null-device' to `grep' commands.\nThis is done to ensure that the output of grep includes the filename of\nany match in the case where only a single file is searched, and is not\nnecessary if the grep program used supports the `-H' option.\n\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults'; to change the default value, use\nCustomize or call the function `grep-apply-setting'." (choice (const :tag "Do Not Append Null Device" nil) (const :tag "Append Null Device" t) (other :tag "Not Set" auto-detect)) grep-use-null-filename-separator #f(compiled-function () #) "If non-nil, use `grep's `--null' option.\nThis is done to disambiguate file names in `grep's output." (choice (const :tag "Do Not Use `--null'" nil) (const :tag "Use `--null'" t) (other :tag "Not Set" auto-detect)) grep-find-command #f(compiled-function () #) "The default find command for \\[grep-find].\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults'; to change the default value, use\nCustomize or call the function `grep-apply-setting'." (choice string (const :tag "Not Set" nil)) grep-find-template #f(compiled-function () #) "The default command to run for \\[rgrep].\nThe following place holders should be present in the string:\n - base directory for find\n - find options to restrict or expand the directory list\n - find options to limit the files matched\n - place to put the grep options like -i and --color\n - the regular expression searched for.\nIn interactive usage, the actual value of this variable is set up\nby `grep-compute-defaults'; to change the default value, use\nCustomize or call the function `grep-apply-setting'." (choice string (const :tag "Not Set" nil)) grep-files-aliases #f(compiled-function () #) "Alist of aliases for the FILES argument to `lgrep' and `rgrep'." alist grep-find-ignored-directories #f(compiled-function () #) "List of names of sub-directories which `rgrep' shall not recurse into.\nIf an element is a cons cell, the car is called on the search directory\nto determine whether cdr should not be recursed into." (choice (repeat :tag "Ignored directories" string) (const :tag "No ignored directories" nil)) grep-find-ignored-files #f(compiled-function () #) "List of file names which `rgrep' and `lgrep' shall exclude.\nIf an element is a cons cell, the car is called on the search directory\nto determine whether cdr should not be excluded." (choice (repeat :tag "Ignored file" string) (const :tag "No ignored files" nil)) grep-save-buffers #f(compiled-function () #) "If non-nil, save buffers before running the grep commands.\nIf `ask', ask before saving. If a function, call it with no arguments\nwith each buffer current, as a predicate to determine whether that\nbuffer should be saved or not. E.g., one can set this to\n (lambda ()\n (string-prefix-p my-grep-root (file-truename (buffer-file-name))))\nto limit saving to files located under `my-grep-root'." "26.1" (choice (const :tag "Ask before saving" ask) (const :tag "Don't save buffers" nil) function (other :tag "Save all buffers" t)) grep-error-screen-columns #f(compiled-function () #) "If non-nil, column numbers in grep hits are screen columns.\nSee `compilation-error-screen-columns'" (choice (const :tag "Default" nil) integer) grep-setup-hook #f(compiled-function () #) "List of hook functions run by `grep-process-setup' (see `run-hooks')." hook] 12) #(grep nil nil) ad-Advice-require(# grep) apply(ad-Advice-require # grep) require(grep) byte-code("\300\301!\210\302\303\304\305\306\307\310\301&\007\210\311\312\3= 04\313\310\303\314\315&\007\210\311\316\317\320\310\303\314\321&\007\210\31= 1\322\304\323\310\303\314\315&\007\207" [require grep custom-declare-group wgrep nil "Customize wgrep" :prefix "wgrep-" :group custom-declare-variable wgrep-change-readonly-file "Non-nil means to enable change read-only files." :type boolean wgrep-enable-key "\003\020" "This variable will be obsoleted in the future release.\nKey to enable `wgrep-mode'." string wgrep-auto-save-buffer "Non-nil means do `save-buffer' automatically while `wgrep-finish-edit'."] 8) #(wgrep nil nil) ad-Advice-require(# wgrep) apply(ad-Advice-require # wgrep) require(wgrep) byte-code("\300\301!\210\300\302!\207" [require wgrep cl-lib] 2) wgrep-ag-setup() run-hooks(change-major-mode-after-body-hook compilation-mode-hook ag-mode-hook) apply(run-hooks (change-major-mode-after-body-hook compilation-mode-hook ag-mode-hook)) run-mode-hooks(ag-mode-hook) ag-mode() compilation-start("ag --nogroup --line-number --column --color --color-match 30\\;43 --color-path 1\\;32 --nogroup --skip-vcs-ignores --numbers --smart-case --follow --ignore \\#\\*\\# --stats -- preserve-breaks ." ag-mode (lambda (mode-name) "*ag search regexp:preserve-breaks dir:~/stow/pub_dotfiles/emacs/dot-emacs.d/elisp/org-mode/*")) ag/search("preserve-breaks" "~/stow/pub_dotfiles/emacs/dot-emacs.d/elisp/org-mode/" :regexp t) ag-project-regexp("preserve-breaks") funcall-interactively(ag-project-regexp "preserve-breaks") call-interactively(ag-project-regexp nil nil) command-execute(ag-project-regexp) =3D=3D=3D=3D=3D PS: @Noam: Thanks for making the elisp backtrace copyable :) [1]: http://git.savannah.gnu.org/cgit/emacs.git/commit/?id=3D644cdd1aa0a10dbfffa= 3b9b4c7a97f8cddded0b8 [2]: https://github.com/Wilfred/ag.el --=20 Kaushal Modi --001a1142bfbeebb4f70554e01282 Content-Type: text/html; charset="UTF-8" Content-Transfer-Encoding: quoted-printable
Hello,

I believe I started seeing this = error after this commit[1].

I get the error when a= ttempting to use ag search from ag.el[2].

=3D=3D= =3D=3D=3D
Debugger entered--Lisp error: (wrong-type-argument= consp nil)
=C2=A0 grep-apply-setting(grep-use-null-filename-sepa= rator t)
=C2=A0 custom-initialize-reset(grep-use-null-filename-se= parator (funcall (function #f(compiled-function () #<bytecode>))))
=C2=A0 custom-declare-variable(grep-use-null-filename-separator (fu= ncall (function #f(compiled-function () #<bytecode>))) "If non-n= il, use `grep's `--null' option.\nThis is done to disambiguate file= names in `grep's output." :type (choice (const :tag "Do Not = Use `--null'" nil) (const :tag "Use `--null'" t) (ot= her :tag "Not Set" auto-detect)) :set grep-apply-setting :group g= rep)
=C2=A0 byte-code("\300\301\302\303\304DD\305\306\307\31= 0\311\312\313&\011\210\300\314\302\303\315DD\316\306\317\320\321\310\31= 1\312\313&\013\210\300\322\302\303\323DD\324\306\325\310\311\312\313&am= p;\011\210\300\326\302\303\327DD\330\306\331\320\321\312\313&\011\210\3= 00\332\302\303\333DD\334\306\335\320\321\310\311\312\313&\013\210\300\3= 36\302\303\337DD\340\306\341\320\321\312\313&\011\210\300\342\302\303\3= 43DD\344\306\345\320\321\312\313&\011\210\300\346\302\303\347DD\350\306= \351\320\321\312\313&\011\210\300\352\302\303\353DD\354\306\355\320\321= \310\311\312\313&\013\210\300\356\302\303\357DD\360\306\361\312\313&= ;\007\210\300\362\302\303\363DD\364\306\365\312\313&\007\210\300\366\30= 2\303\367DD\370\306\371\312\313&\007\210\300\372\302\303\373DD\374\310\= 375\306\376\312\313&\011\210\300\377\302\303\201@\0\ DD\201A\0\306\201B= \0\310\311\312\313&\011\210\300\201C\0\302\303\201D\0\ DD\201E\0\306\20= 1F\0\312\313&\007\207" [custom-declare-variable grep-window-height= funcall function #f(compiled-function () #<bytecode>) "Number o= f lines in a grep window.=C2=A0 If nil, use `compilation-window-height'= ." :type (choice (const :tag "Default" nil) integer) :versio= n "22.1" :group grep grep-highlight-matches #f(compiled-function = () #<bytecode>) "Use special markers to highlight grep matches.\= n\nSome grep programs are able to surround matches with special\nmarkers in= grep output.=C2=A0 Such markers can be used to highlight\nmatches in grep = mode.=C2=A0 This requires `font-lock-mode' to be active\nin grep buffer= s, so if you have globally disabled font-lock-mode,\nyou will not get highl= ighting.\n\nThis option sets the environment variable GREP_COLORS to specif= y\nmarkers for highlighting and adds the --color option in front of\nany ex= plicit grep options before starting the grep.\n\nWhen this option is `auto&= #39;, grep uses `--color' to highlight\nmatches only when it outputs to= a terminal (when `grep' is the last\ncommand in the pipe), thus avoidi= ng the use of any potentially-harmful\nescape sequences when standard outpu= t goes to a file or pipe.\n\nTo make grep highlight matches even into a pip= e, you need the option\n`always' that forces grep to use `--color=3Dalw= ays' to unconditionally\noutput escape sequences.\n\nIn interactive usa= ge, the actual value of this variable is set up\nby `grep-compute-defaults&= #39; when the default value is `auto-detect'.\nTo change the default va= lue, use Customize or call the function\n`grep-apply-setting'." (c= hoice (const :tag "Do not highlight matches with grep markers" ni= l) (const :tag "Highlight matches with grep markers" t) (const :t= ag "Use --color=3Dalways" always) (const :tag "Use --color&q= uot; auto) (other :tag "Not Set" auto-detect)) :set grep-apply-se= tting grep-scroll-output #f(compiled-function () #<bytecode>) "N= on-nil to scroll the *grep* buffer window as output appears.\n\nSetting it = causes the grep commands to put point at the end of their\noutput window so= that the end of the output is always visible rather\nthan the beginning.&q= uot; boolean grep-command #f(compiled-function () #<bytecode>) "= The default grep command for \\[grep].\nIf the grep program used supports a= n option to always include file names\nin its output (such as the `-H' = option to GNU grep), it's a good idea to\ninclude it when specifying `g= rep-command'.\n\nIn interactive usage, the actual value of this variabl= e is set up\nby `grep-compute-defaults'; to change the default value, u= se\nCustomize or call the function `grep-apply-setting'." (choice = string (const :tag "Not Set" nil)) grep-template #f(compiled-func= tion () #<bytecode>) "The default command to run for \\[lgrep].\= nThe following place holders should be present in the string:\n <C> -= place to put the options like -i and --color.\n <F> - file names and= wildcards to search.\n <X> - file names and wildcards to exclude.\n = <R> - the regular expression searched for.\n <N> - place to ins= ert null-device.\n\nIn interactive usage, the actual value of this variable= is set up\nby `grep-compute-defaults'; to change the default value, us= e\nCustomize or call the function `grep-apply-setting'." (choice s= tring (const :tag "Not Set" nil)) grep-use-null-device #f(compile= d-function () #<bytecode>) "If t, append the value of `null-devi= ce' to `grep' commands.\nThis is done to ensure that the output of = grep includes the filename of\nany match in the case where only a single fi= le is searched, and is not\nnecessary if the grep program used supports the= `-H' option.\n\nIn interactive usage, the actual value of this variabl= e is set up\nby `grep-compute-defaults'; to change the default value, u= se\nCustomize or call the function `grep-apply-setting'." (choice = (const :tag "Do Not Append Null Device" nil) (const :tag "Ap= pend Null Device" t) (other :tag "Not Set" auto-detect)) gre= p-use-null-filename-separator #f(compiled-function () #<bytecode>) &q= uot;If non-nil, use `grep's `--null' option.\nThis is done to disam= biguate file names in `grep's output." (choice (const :tag "D= o Not Use `--null'" nil) (const :tag "Use `--null'" = t) (other :tag "Not Set" auto-detect)) grep-find-command #f(compi= led-function () #<bytecode>) "The default find command for \\[gr= ep-find].\nIn interactive usage, the actual value of this variable is set u= p\nby `grep-compute-defaults'; to change the default value, use\nCustom= ize or call the function `grep-apply-setting'." (choice string (co= nst :tag "Not Set" nil)) grep-find-template #f(compiled-function = () #<bytecode>) "The default command to run for \\[rgrep].\nThe = following place holders should be present in the string:\n <D> - base= directory for find\n <X> - find options to restrict or expand the di= rectory list\n <F> - find options to limit the files matched\n <C&= gt; - place to put the grep options like -i and --color\n <R> - the r= egular expression searched for.\nIn interactive usage, the actual value of = this variable is set up\nby `grep-compute-defaults'; to change the defa= ult value, use\nCustomize or call the function `grep-apply-setting'.&qu= ot; (choice string (const :tag "Not Set" nil)) grep-files-aliases= #f(compiled-function () #<bytecode>) "Alist of aliases for the = FILES argument to `lgrep' and `rgrep'." alist grep-find-ignore= d-directories #f(compiled-function () #<bytecode>) "List of name= s of sub-directories which `rgrep' shall not recurse into.\nIf an eleme= nt is a cons cell, the car is called on the search directory\nto determine = whether cdr should not be recursed into." (choice (repeat :tag "I= gnored directories" string) (const :tag "No ignored directories&q= uot; nil)) grep-find-ignored-files #f(compiled-function () #<bytecode>= ;) "List of file names which `rgrep' and `lgrep' shall exclude= .\nIf an element is a cons cell, the car is called on the search directory\= nto determine whether cdr should not be excluded." (choice (repeat :ta= g "Ignored file" string) (const :tag "No ignored files"= nil)) grep-save-buffers #f(compiled-function () #<bytecode>) "I= f non-nil, save buffers before running the grep commands.\nIf `ask', as= k before saving.=C2=A0 If a function, call it with no arguments\nwith each = buffer current, as a predicate to determine whether that\nbuffer should be = saved or not.=C2=A0 E.g., one can set this to\n =C2=A0(lambda ()\n =C2=A0 = =C2=A0(string-prefix-p my-grep-root (file-truename (buffer-file-name))))\nt= o limit saving to files located under `my-grep-root'." "26.1&= quot; (choice (const :tag "Ask before saving" ask) (const :tag &q= uot;Don't save buffers" nil) function (other :tag "Save all b= uffers" t)) grep-error-screen-columns #f(compiled-function () #<byt= ecode>) "If non-nil, column numbers in grep hits are screen columns= .\nSee `compilation-error-screen-columns'" (choice (const :tag &qu= ot;Default" nil) integer) grep-setup-hook #f(compiled-function () #<= ;bytecode>) "List of hook functions run by `grep-process-setup'= (see `run-hooks')." hook] 12)
=C2=A0 #<subr require&= gt;(grep nil nil)
=C2=A0 ad-Advice-require(#<subr require> = grep)
=C2=A0 apply(ad-Advice-require #<subr require> grep)<= /div>
=C2=A0 require(grep)
=C2=A0 byte-code("\300\301!\2= 10\302\303\304\305\306\307\310\301&\007\210\311\312\304\313\310\303\314= \315&\007\210\311\316\317\320\310\303\314\321&\007\210\311\322\304\= 323\310\303\314\315&\007\207" [require grep custom-declare-group w= grep nil "Customize wgrep" :prefix "wgrep-" :group cust= om-declare-variable wgrep-change-readonly-file "Non-nil means to enabl= e change read-only files." :type boolean wgrep-enable-key "\003\0= 20" "This variable will be obsoleted in the future release.\nKey = to enable `wgrep-mode'." string wgrep-auto-save-buffer "Non-n= il means do `save-buffer' automatically while `wgrep-finish-edit'.&= quot;] 8)
=C2=A0 #<subr require>(wgrep nil nil)
= =C2=A0 ad-Advice-require(#<subr require> wgrep)
=C2=A0 appl= y(ad-Advice-require #<subr require> wgrep)
=C2=A0 require(w= grep)
=C2=A0 byte-code("\300\301!\210\300\302!\207" [re= quire wgrep cl-lib] 2)
=C2=A0 wgrep-ag-setup()
=C2=A0 r= un-hooks(change-major-mode-after-body-hook compilation-mode-hook ag-mode-ho= ok)
=C2=A0 apply(run-hooks (change-major-mode-after-body-hook com= pilation-mode-hook ag-mode-hook))
=C2=A0 run-mode-hooks(ag-mode-h= ook)
=C2=A0 ag-mode()
=C2=A0 compilation-start("ag= --nogroup --line-number --column --color --color-match 30\\;43 --color-pat= h 1\\;32 --nogroup --skip-vcs-ignores --numbers --smart-case --follow --ign= ore \\#\\*\\# --stats -- preserve-breaks ." ag-mode (lambda (mode-name= ) "*ag search regexp:preserve-breaks dir:~/stow/pub_dotfiles/emacs/dot= -emacs.d/elisp/org-mode/*"))
=C2=A0 ag/search("preserve= -breaks" "~/stow/pub_dotfiles/emacs/dot-emacs.d/elisp/org-mode/&q= uot; :regexp t)
=C2=A0 ag-project-regexp("preserve-breaks&qu= ot;)
=C2=A0 funcall-interactively(ag-project-regexp "preserv= e-breaks")
=C2=A0 call-interactively(ag-project-regexp nil n= il)
=C2=A0 command-execute(ag-project-regexp)
=3D= =3D=3D=3D=3D

PS: @Noam: Thanks for making the elis= p backtrace copyable :)

--

Kaushal Modi

--001a1142bfbeebb4f70554e01282--