From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.io!.POSTED.blaine.gmane.org!not-for-mail From: Jean Louis Newsgroups: gmane.emacs.devel Subject: void-function buffer-local-boundp Date: Wed, 02 Jun 2021 14:43:27 +0300 Message-ID: Injection-Info: ciao.gmane.io; posting-host="blaine.gmane.org:116.202.254.214"; logging-data="29676"; mail-complaints-to="usenet@ciao.gmane.io" To: Emacs Developers Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Wed Jun 02 13:45:09 2021 Return-path: Envelope-to: ged-emacs-devel@m.gmane-mx.org Original-Received: from lists.gnu.org ([209.51.188.17]) by ciao.gmane.io with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.92) (envelope-from ) id 1loPJ7-0007bB-FL for ged-emacs-devel@m.gmane-mx.org; Wed, 02 Jun 2021 13:45:09 +0200 Original-Received: from localhost ([::1]:40526 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1loPJ6-0006fm-BS for ged-emacs-devel@m.gmane-mx.org; Wed, 02 Jun 2021 07:45:08 -0400 Original-Received: from eggs.gnu.org ([2001:470:142:3::10]:40034) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1loPHq-0004fh-Ik for emacs-devel@gnu.org; Wed, 02 Jun 2021 07:43:50 -0400 Original-Received: from stw1.rcdrun.com ([217.170.207.13]:58463) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1loPHo-00073r-3o for emacs-devel@gnu.org; Wed, 02 Jun 2021 07:43:50 -0400 Original-Received: from localhost ([::ffff:197.157.0.35]) (AUTH: PLAIN admin, TLS: TLS1.3,256bits,ECDHE_RSA_AES_256_GCM_SHA384) by stw1.rcdrun.com with ESMTPSA id 00000000000ADF01.0000000060B76EEF.00001CE3; Wed, 02 Jun 2021 04:43:40 -0700 Received-SPF: pass client-ip=217.170.207.13; envelope-from=support1@rcdrun.com; helo=stw1.rcdrun.com X-Spam_score_int: -1 X-Spam_score: -0.2 X-Spam_bar: / X-Spam_report: (-0.2 / 5.0 requ) BAYES_00=-1.9, HEADER_FROM_DIFFERENT_DOMAINS=0.249, RCVD_IN_SORBS_WEB=1.5, SPF_HELO_PASS=-0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.23 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane-mx.org@gnu.org Original-Sender: "Emacs-devel" Xref: news.gmane.io gmane.emacs.devel:270281 Archived-At: On C-h v I get this, but not in emacs -Q: Debugger entered--Lisp error: (void-function buffer-local-boundp) (buffer-local-boundp vv orig-buffer) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))) (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))))(eshell-insert-buffer-name) funcall((closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) eshell-insert-buffer-name) (or (funcall pred sym) (memq sym prefix-completions)) (closure ((prefix-completions) (action) (pred closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) (string . "eshe") t) (sym) (or (funcall pred sym) (memq sym prefix-completions)))(eshell-insert-buffer-name) try-completion("eshe" [0 table--measure-max-width postgresql-array-to-hash eshell-insert-buffer-name to-name ANG term-do-line-wrapping NJEUAENA speedbar-check-vc-this-line calc-alg-entry traverse help-follow-symbol hyperscope-markdown-kill-hyperlink eshell-mv-interactive-query term-handle-exit dired-unmark-all-marks rng-parse-validate-file C-c speedbar-file-regexp Add\ PDF\ by\ page org-table--descriptor-line helm-show-kill-ring eshell-return-exits-minibuffer info--manual-names cf-directory-by-id calc-do-grab-region hyperdocuments val-start-pos :where *table--cell-kill-paragraph :odt-styles-file vc-annotate cf-count-calls-interactions xref--push-markers Help\ on\ Variables var-ArgH maildir/part-desc->part-idx eshell--sep-terms gnus-summary-limit-to-marks geiser-eval--retort-result-str MI NIMIZE helm-grep-save-results-1 article-fill-long-lines wrs-category-of-category selected-coding calcFunc-erfc xref-group calc-set-xor tramp-handle-make-auto-save-file-name zot ...] (closure ((prefix-completions) (action) (pred closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) (string . "eshe") t) (sym) (or (funcall pred sym) (memq sym prefix-completions)))) complete-with-action(nil [0 table--measure-max-width postgresql-array-to-hash eshell-insert-buffer-name to-name ANG term-do-line-wrapping NJEUAENA speedbar-check-vc-this-line calc-alg-entry traverse help-follow-symbol hyperscope-markdown-kill-hyperlink eshell-mv-interactive-query term-handle-exit dired-unmark-all-marks rng-parse-validate-file C-c speedbar-file-regexp Add\ PDF\ by\ page org-table--descriptor-line helm-show-kill-ring eshell-return-exits-minibuffer info--manual-names cf-directory-by-id calc-do-grab-region hyperdocuments val-start-pos :where *table--cell-kill-paragraph :odt-styles-file vc-annotate cf-count-calls-interactions xref--push-markers Help\ on\ Variables var-ArgH maildir/part-desc->part-idx eshell--sep-terms gnus-summary-limit-to-marks geiser-eval--retort-result-str MINIMIZE helm-grep-save-results-1 article-fill-long-lines wrs-category-of-category selected-coding calcFunc-erfc xref-group calc-set-xor tramp-handle-make-auto-save-file-name zot ...] "eshe" (closure ((prefix-completions) (action) (pred closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) (string . "eshe") t) (sym) (or (funcall pred sym) (memq sym prefix-completions)))) (let ((prefix-completions (and help-enable-completion-autoload (mapcar #'intern (all-completions string definition-prefixes))))) (complete-with-action action obarray string (if pred #'(lambda (sym) (or (funcall pred sym) (memq sym prefix-completions)))))) (if (and completions-detailed (eq action 'metadata)) '(metadata (affixation-function . help--symbol-completion-table-affixation)) (if help-enable-completion-autoload (progn (let ((prefixes (radix-tree-prefixes (help-definition-prefixes) string))) (help--load-prefixes prefixes)))) (let ((prefix-completions (and help-enable-completion-autoload (mapcar #'intern (all-completions string definition-prefixes))))) (complete-with-action action obarray string (if pred #'(lambda (sym) (or (funcall pred sym) (memq sym prefix-completions))))))) help--symbol-completion-table("eshe" (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) nil) try-completion("eshe" help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))))) completion-basic-try-completion("eshe" help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) 4) #f(compiled-function (style) #)(basic) completion--some(#f(compiled-function (style) #) (basic partial-completion emacs22)) completion--nth-completion(1 "eshe" help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) 4 (metadata)) completion-try-completion("eshe" help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) 4 (metadata)) completion--do-completion(20 24) completion--in-region-1(20 24) #f(compiled-function (start end collection predicate) #)(20 24 help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))))) apply(#f(compiled-function (start end collection predicate) #) (20 24 help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))))) #f(compiled-function (funs global args) #)(nil nil (20 24 help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))))) completion--in-region(20 24 help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))))) completion-in-region(20 24 help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer))))) minibuffer-complete() funcall-interactively(minibuffer-complete) call-interactively(minibuffer-complete nil nil) command-execute(minibuffer-complete) read-from-minibuffer("Describe variable: " nil (keymap (18 . helm-minibuffer-history) (10 . minibuffer-complete-and-exit) (13 . minibuffer-complete-and-exit) keymap (18 . helm-minibuffer-history) (menu-bar keymap (minibuf "Minibuf" keymap (tab menu-item "Complete" minibuffer-complete :help "Complete as far as possible") (space menu-item "Complete Word" minibuffer-complete-word :help "Complete at most one word") (63 menu-item "List Completions" minibuffer-completion-help :help "Display all possible completions") "Minibuf")) (27 keymap (118 . switch-to-completions)) (prior . switch-to-completions) (63 . minibuffer-completion-help) (32 . minibuffer-complete-word) (9 . minibuffer-complete) keymap (18 . helm-minibuffer-history) (menu-bar keymap (minibuf "Minibuf" keymap (previous menu-item "P revious History Item" previous-history-element :help "Put previous minibuffer history element in the min...") (next menu-item "Next History Item" next-history-element :help "Put next minibuffer history element in the minibuf...") (isearch-backward menu-item "Isearch History Backward" isearch-backward :help "Incrementally search minibuffer history backward") (isearch-forward menu-item "Isearch History Forward" isearch-forward :help "Incrementally search minibuffer history forward") (return menu-item "Enter" exit-minibuffer :key-sequence "\15" :help "Terminate input and exit minibuffer") (quit menu-item "Quit" abort-recursive-edit :help "Abort input and exit minibuffer") "Minibuf")) (10 . exit-minibuffer) (13 . exit-minibuffer) (7 . minibuffer-keyboard-quit) (C-tab . file-cache-minibuffer- complete) (9 . self-insert-command) (XF86Back . previous-history-element) (up . previous-line-or-history-element) (prior . previous-history-element) (XF86Forward . next-history-element) (down . next-line-or-history-element) (next . next-history-element) (27 keymap (60 . minibuffer-beginning-of-buffer) (114 . previous-matching-history-element) (115 . next-matching-history-element) (112 . previous-history-element) (110 . next-history-element))) nil nil nil nil) completing-read-default("Describe variable: " help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) t nil nil nil nil) completing-read("Describe variable: " help--symbol-completion-table (closure ((val) (orig-buffer . #) (v . 0) t) (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) t nil nil nil) (setq val (completing-read (format-prompt "Describe variable" (and (symbolp v) v)) #'help--symbol-completion-table #'(lambda (vv) (or (get vv 'variable-documentation) (and (not (keywordp vv)) (buffer-local-boundp vv orig-buffer)))) t nil nil (if (symbolp v) (symbol-name v)))) (let ((v (variable-at-point)) (enable-recursive-minibuffers t) (orig-buffer (current-buffer)) val) (setq val (completing-read (format-prompt "Describe variable" (and (symbolp v) v)) #'help--symbol-completion-table #'(lambda (vv) (or (get vv 'variable-documentation) (and (not ...) (buffer-local-boundp vv orig-buffer)))) t nil nil (if (symbolp v) (symbol-name v)))) (list (if (equal val "") v (intern val)))) call-interactively(describe-variable nil nil) command-execute(describe-variable)