[ESS] Polymode keymap error

[Tyler Smith]

Yes, no errors. I had to include all the dependencies to get it to 
work:

```

(setq package-load-list
      '((use-package t)
	(bind-key t)
	(polymode t)
	(poly-R t)
	(poly-markdown t)
	(poly-noweb t)
	(markdown-mode t)
	(ess t)
	(julia-mode t)))
(package-initialize)

(require 'use-package)

(use-package polymode
  :ensure t)

(use-package poly-R
  :after polymode
  :ensure t)

(use-package poly-markdown
  :after polymode
  :mode
  ("\\.Rmd\\'" . poly-markdown+R-mode)
  :ensure t)

```

John Haman writes:

> Tyler, thanks, I'll try to reproduce your example when I get 
> home tonight.
>
> In the meantime, can you try your code without the defer 
> keywords and confirm the absence of an error?
>
> Thanks,
> John
>
> On Tue, Mar 9, 2021, at 10:22 AM, Tyler Smith wrote:
>> I can't reproduce your problem. I tried opening `emacs -Q`, 
>> then 
>> running the following code. It works without any error. Is this 
>> enough to cause the error on your system? If not, there's 
>> something else in your config creating the issue:
>> 
>> 
>> ```
>> (setq package-load-list
>>       '((use-package t)
>> 	(bind-key t)))
>> (package-initialize)
>> 
>> (require 'use-package)
>> 
>> (use-package polymode
>>   :defer t
>>   :ensure t)
>> 
>> (use-package poly-R
>>   :defer t
>>   :after polymode
>>   :ensure t)
>> 
>> (use-package poly-markdown
>>   :defer t
>>   :after polymode
>>   :mode
>>   ("\\.Rmd\\'" . poly-markdown+R-mode)
>>   :ensure t)
>> 
>> ```
>> 
>> 
>> John Haman writes:
>> 
>> > Thanks, I've been using this use-package declaration for some 
>> > time (with a few of my custom functions omitted for brevity)
>> >
>> > (use-package polymode
>> >   :defer t
>> >   :ensure t)
>> >
>> > (use-package poly-R
>> >   :defer t
>> >   :after polymode
>> >   :ensure t)
>> >
>> > (use-package poly-markdown
>> >   :defer t
>> >   :after polymode
>> >   :mode
>> >   ("\\.Rmd\\'" . poly-markdown+R-mode)
>> >   :ensure t)
>> >
>> >
>> >
>> > On Mon, Mar 8, 2021, at 10:32 PM, Tyler Smith wrote:
>> >> Can you show us your Emacs config, or at least the 
>> >> use-package 
>> >> expression you use for poly-mode?
>> >> 
>> >> Best,
>> >> 
>> >> Tyler
>> >> 
>> >> John Haman via ESS-help writes:
>> >> 
>> >> > I'm having an issue with Poly-R or poly-markdown. When I 
>> >> > start 
>> >> > up my 
>> >> > Emacs installation, I get a strange error about a keymap:
>> >> >
>> >> > Error (use-package): poly-markdown/:catch: Symbol’s value 
>> >> > as 
>> >> > variable is 
>> >> > void: keymap Disable showing Disable logging
>> >> >
>> >> > I have no issues loading polymode, but either of poly-R or 
>> >> > poly-markdown 
>> >> > triggers the error.
>> >> >
>> >> > Thanks everyone.
>> >> >
>> >> > The traceback is below.
>> >> >
>> >> > Debugger entered--Lisp error: (void-variable keymap)
>> >> > byte-code("\306\307!\210\310\311!\210\312\313\10!\203\23\0\10\202O\0\313\10!\203\35\0\314\202E\0\315\11J!\2036\0\316\10\11J\"\317\n\2@\"\20\211A\262..." 
>> >> > [keymap parent keylist parent-conf polymode-minor-mode-map 
>> >> > parent-conf-name make-variable-buffer-local 
>> >> > poly-markdown-mode 
>> >> > makunbound poly-markdown-mode-map (lambda (def-tmp-var) 
>> >> > (defvar 
>> >> > poly-markdown-mode-map def-tmp-var "Keymap for 
>> >> > poly-markdown-mode.")) 
>> >> > keymapp nil eieio-object-p 
>> >> > pm--get-keylist\.keymap-from-parent 
>> >> > append 
>> >> > derived-mode-map-name eieio-oref -minor-mode 
>> >> > easy-mmode-define-keymap 
>> >> > :inherit poly-markdown-polymode (lambda (def-tmp-var) 
>> >> > (defvar 
>> >> > poly-markdown-polymode def-tmp-var "Configuration object 
>> >> > for 
>> >> > `poly-markdown-mode' poly...")) clone :name 
>> >> > "poly-markdown-polymode" 
>> >> > :innermodes (poly-markdown-fenced-code-innermode 
>> >> > poly-markdown-displayed-math-innermode 
>> >> > poly-markdown-inline-math-innermode 
>> >> > poly-markdown-yaml-metadata-innermode) :hostmode 
>> >> > poly-markdown-hostmode 
>> >> > pm-polymode defalias #f(compiled-function (&optional arg) 
>> >> > "nil\n\n\\{poly-markdown-mode-map}" (interactive nil) 
>> >> > #<bytecode 
>> >> > 0x141a4722905af83a>) add-minor-mode " PM" add-to-list 
>> >> > auto-mode-alist 
>> >> > ("\\.md\\'" . poly-markdown-mode)] 11)
>> >> >    require(poly-markdown nil t)
>> >> >    (not (require 'poly-markdown nil t))
>> >> >    (if (not (require 'poly-markdown nil t)) 
>> >> >    (display-warning 
>> >> > 'use-package (format "Cannot load %s" 'poly-markdown) 
>> >> > :error) 
>> >> > (use-package-statistics-gather :config 'poly-markdown nil) 
>> >> > (use-package-statistics-gather :config 'poly-markdown t))
>> >> >    (progn (use-package-statistics-gather :init 
>> >> >    'poly-markdown 
>> >> >    nil) (if 
>> >> > (not (require 'poly-markdown nil t)) (display-warning 
>> >> > 'use-package 
>> >> > (format "Cannot load %s" 'poly-markdown) :error) 
>> >> > (use-package-statistics-gather :config 'poly-markdown nil) 
>> >> > (use-package-statistics-gather :config 'poly-markdown t)) 
>> >> > (use-package-statistics-gather :init 'poly-markdown t))
>> >> >    (closure (t) nil (progn (use-package-statistics-gather 
>> >> >    :init 
>> >> > 'poly-markdown nil) (if (not (require 'poly-markdown nil 
>> >> > t)) 
>> >> > (display-warning 'use-package (format "Cannot load %s" 
>> >> > 'poly-markdown) 
>> >> > :error) (use-package-statistics-gather :config 
>> >> > 'poly-markdown 
>> >> > nil) 
>> >> > (use-package-statistics-gather :config 'poly-markdown t)) 
>> >> > (use-package-statistics-gather :init 'poly-markdown t)))()
>> >> >    eval-after-load(polymode (closure (t) nil (progn 
>> >> > (use-package-statistics-gather :init 'poly-markdown nil) 
>> >> > (if 
>> >> > (not 
>> >> > (require 'poly-markdown nil t)) (display-warning 
>> >> > 'use-package 
>> >> > (format 
>> >> > "Cannot load %s" 'poly-markdown) :error) 
>> >> > (use-package-statistics-gather 
>> >> > :config 'poly-markdown nil) (use-package-statistics-gather 
>> >> > :config 
>> >> > 'poly-markdown t)) (use-package-statistics-gather :init 
>> >> > 'poly-markdown t))))
>> >> >    (condition-case err (eval-after-load 'polymode 
>> >> >    #'(lambda 
>> >> >    nil 
>> >> >    (progn 
>> >> > (use-package-statistics-gather :init 'poly-markdown nil) 
>> >> > (if 
>> >> > (not 
>> >> > (require ... nil t)) (display-warning 'use-package (format 
>> >> > "Cannot load 
>> >> > %s" ...) :error) (use-package-statistics-gather :config 
>> >> > 'poly-markdown 
>> >> > nil) (use-package-statistics-gather :config 'poly-markdown 
>> >> > t)) 
>> >> > (use-package-statistics-gather :init 'poly-markdown t)))) 
>> >> > ((debug error) 
>> >> > (funcall use-package--warning102 :catch err)))
>> >> >    (progn (use-package-statistics-gather :use-package 
>> >> >    'poly-markdown 
>> >> > nil) (use-package-ensure-elpa 'poly-markdown '(t) 'nil) 
>> >> > (defvar 
>> >> > use-package--warning102 #'(lambda (keyword err) (let ((msg 
>> >> > (format 
>> >> > "%s/%s: %s" ... keyword ...))) (display-warning 
>> >> > 'use-package 
>> >> > msg 
>> >> > :error)))) (condition-case err (eval-after-load 'polymode 
>> >> > #'(lambda nil 
>> >> > (progn (use-package-statistics-gather :init 'poly-markdown 
>> >> > nil) 
>> >> > (if (not 
>> >> > ...) (display-warning ... ... :error) 
>> >> > (use-package-statistics-gather 
>> >> > :config ... nil) (use-package-statistics-gather :config 
>> >> > ... 
>> >> > t)) 
>> >> > (use-package-statistics-gather :init 'poly-markdown t)))) 
>> >> > ((debug error) 
>> >> > (funcall use-package--warning102 :catch err))) 
>> >> > (use-package-statistics-gather :use-package 'poly-markdown 
>> >> > t))
>> >> >    (progn (progn (use-package-statistics-gather 
>> >> >    :use-package 
>> >> > 'poly-markdown nil) (use-package-ensure-elpa 
>> >> > 'poly-markdown 
>> >> > '(t) 
>> >> > 'nil) 
>> >> > (defvar use-package--warning102 #'(lambda (keyword err) 
>> >> > (let 
>> >> > ((msg ...)) 
>> >> > (display-warning 'use-package msg :error)))) 
>> >> > (condition-case 
>> >> > err 
>> >> > (eval-after-load 'polymode #'(lambda nil (progn 
>> >> > (use-package-statistics-gather :init ... nil) (if ... ... 
>> >> > ... 
>> >> > ...) 
>> >> > (use-package-statistics-gather :init ... t)))) ((debug 
>> >> > error) 
>> >> > (funcall 
>> >> > use-package--warning102 :catch err))) 
>> >> > (use-package-statistics-gather 
>> >> > :use-package 'poly-markdown t)))
>> >> >    eval((progn (progn (use-package-statistics-gather 
>> >> >    :use-package 
>> >> > 'poly-markdown nil) (use-package-ensure-elpa 
>> >> > 'poly-markdown 
>> >> > '(t) 
>> >> > 'nil) 
>> >> > (defvar use-package--warning102 #'(lambda (keyword err) 
>> >> > (let 
>> >> > (...) 
>> >> > (display-warning ... msg :error)))) (condition-case err 
>> >> > (eval-after-load 
>> >> > 'polymode #'(lambda nil (progn ... ... ...))) ((debug 
>> >> > error) 
>> >> > (funcall 
>> >> > use-package--warning102 :catch err))) 
>> >> > (use-package-statistics-gather 
>> >> > :use-package 'poly-markdown t))) t)
>> >> >    elisp--eval-last-sexp(nil)
>> >> >    eval-last-sexp(nil)
>> >> >    funcall-interactively(eval-last-sexp nil)
>> >> >    call-interactively(eval-last-sexp nil nil)
>> >> >    command-execute(eval-last-sexp)
>> >> >
>> >> > ______________________________________________
>> >> > ESS-help using r-project.org mailing list
>> >> > https://stat.ethz.ch/mailman/listinfo/ess-help
>> >> 
>> >> 
>> >> -- 
>> >> Tyler Smith
>> >> plantarum.ca
>> >>
>> 
>> 
>> -- 
>> Tyler Smith
>> plantarum.ca
>>


-- 
Tyler Smith
plantarum.ca