Re: Cannot connect to mail server with NoGnus version, well with Gnus

[Sebastien Vauban]

Hi Lars,

I found my latest problem with gnus-duplicates-delete not being defined: the
elc file were older than the el files...

To start from a clean slate, I did (on Windows + cygwin shell, with EmacsW32
native binary):

#+begin_src sh
  cd ~/src
  git clone http://git.gnus.org/gnus.git
  cd gnus
  ./configure
  make
  make install
#+end_src

In my .emacs, I've put:

#+begin_src emacs-lisp
  (add-to-list 'load-path "~/src/gnus/lisp")
  (require 'gnus-load)
#+end_src

When typing 'M-x gnus', I go much further, but now am blocked by
gnus-macroexpand-all not being defined:

--8<---------------cut here---------------start------------->8---
Debugger entered--Lisp error: (void-function gnus-macroexpand-all)
  gnus-macroexpand-all((nnir-article-rsv (mail-header-number gnus-tmp-header)))
  
byte-code("\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand (mail-header-number gnus-tmp-header) (100) 83 
(mail-header-subject gnus-tmp-header) (115) (115 gnus-tmp-subject-or-nil 115) 
(110 gnus-tmp-name 115) (65 (car ...) 115) (97 (or ... gnus-tmp-from) 115) (70 
gnus-tmp-from 115) 120 (mail-header-xref gnus-tmp-header) (115) 68 
(mail-header-date gnus-tmp-header) (115) (100 (gnus-dd-mmm ...) 115) (111 
(gnus-date-iso8601 ...) 115) 77 (mail-header-id gnus-tmp-header) (115) 114 
(mail-header-references gnus-tmp-header) (115) (99 (or ... 0) 100) (107 
(gnus-summary-line-message-size gnus-tmp-header) 115) (76 gnus-tmp-lines 115) 
90 or gnus-macroexpand-all (nnir-article-rsv (mail-header-number 
gnus-tmp-header)) (0) (100) 71 (nnir-article-group (mail-header-number 
gnus-tmp-header)) ("") (115) 103 (gnus-group-short-name (nnir-article-group 
...)) ("") (115) (79 gnus-tmp-downloaded 99) (73 gnus-tmp-indentation 115) (84 
(if ... "" ...) 115) (82 gnus-tmp-replied 99) (91 gnus-tmp-opening-bracket 99) 
(93 gnus-tmp-closing-bracket 99) (62 (make-string gnus-tmp-level 32) 115) ...] 
41)
  (defvar gnus-summary-line-format-alist (byte-code 
"\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand ... ... 83 ... ... ... ... ... ... ... 120 ... ... 68 ... ... 
... ... 77 ... ... 114 ... ... ... ... ... 90 or gnus-macroexpand-all ... ... 
... 71 ... ... ... 103 ... ... ... ... ... ... ... ... ... ... ...] 41) 
("c:/home/sva/src/gnus/lisp/gnus-sum.elc" . 50958))
  require(gnus-sum)
  byte-code("\300\301!\204\302\301\303\"\210\304\305!\210\304\306!\207" 
[fboundp declare-function defalias (macro . #[... "\300\207" [nil] 1]) require 
gnus gnus-sum] 3)
  gnus-cache-open()
  gnus-setup-news(nil nil nil)
  byte-code("\204    \204\306 \210\202L\307\310!\210\311\n!\f\204
\203!\312 \210\313\314#\210\307\315!\210\2036\316\317\320\"\210\321 
\210\322!\210\323 \210\324\325!\210\326 \210\307\327!\210\314\207" 
[dont-connect did-connect gnus-startup-file gnus-current-startup-file 
gnus-slave gnus-use-dribble-file gnus-group-quit gnus-run-hooks 
gnus-startup-hook gnus-make-newsrc-file gnus-dribble-read-file gnus-setup-news 
nil gnus-setup-news-hook gnus-request-create-group "queue" (nndraft "") 
gnus-start-draft-setup gnus-group-list-groups gnus-group-first-unread-group 
gnus-configure-windows group gnus-group-set-mode-line gnus-started-hook level 
gnus-agent] 4)
  gnus-1(nil nil nil)
  gnus()
  funcall(gnus)
  (if (get-buffer buffer) (switch-to-buffer buffer) (funcall function))
  (if (equal (buffer-name ...) buffer) (bury-buffer) (if (get-buffer buffer) 
(switch-to-buffer buffer) (funcall function)))
  switch-or-start(gnus "*Group*")
  (lambda nil (interactive) (switch-or-start (quote gnus) "*Group*"))()
  call-interactively((lambda nil (interactive) (switch-or-start (quote gnus) 
"*Group*")) nil nil)
  recursive-edit()
  byte-code("\306      
@\307=\203!\310\311\312\"\210\313\311!\211A@)\242\314=\203!\310\315\312\"\210\316
!\210\317 \210\320 !\210\f\203d\321ed\"
V\203Web\210\322
\245y\210`db\210\322
\245
Zy\210`|\210)\323c\210eb\210\324\325\326 
\"\210\327\306!\210\324\330!\210\331\312\324\330!\210\212\332 
\210+\331\207" [unread-command-char debugger-args x debugger-buffer 
noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t 
backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer 
count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil 
recursive-edit middlestart buffer-read-only standard-output] 4)
  debug(error (void-function gnus-macroexpand-all))
  gnus-macroexpand-all((nnir-article-rsv (mail-header-number gnus-tmp-header)))
  
byte-code("\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand (mail-header-number gnus-tmp-header) (100) 83 
(mail-header-subject gnus-tmp-header) (115) (115 gnus-tmp-subject-or-nil 115) 
(110 gnus-tmp-name 115) (65 (car ...) 115) (97 (or ... gnus-tmp-from) 115) (70 
gnus-tmp-from 115) 120 (mail-header-xref gnus-tmp-header) (115) 68 
(mail-header-date gnus-tmp-header) (115) (100 (gnus-dd-mmm ...) 115) (111 
(gnus-date-iso8601 ...) 115) 77 (mail-header-id gnus-tmp-header) (115) 114 
(mail-header-references gnus-tmp-header) (115) (99 (or ... 0) 100) (107 
(gnus-summary-line-message-size gnus-tmp-header) 115) (76 gnus-tmp-lines 115) 
90 or gnus-macroexpand-all (nnir-article-rsv (mail-header-number 
gnus-tmp-header)) (0) (100) 71 (nnir-article-group (mail-header-number 
gnus-tmp-header)) ("") (115) 103 (gnus-group-short-name (nnir-article-group 
...)) ("") (115) (79 gnus-tmp-downloaded 99) (73 gnus-tmp-indentation 115) (84 
(if ... "" ...) 115) (82 gnus-tmp-replied 99) (91 gnus-tmp-opening-bracket 99) 
(93 gnus-tmp-closing-bracket 99) (62 (make-string gnus-tmp-level 32) 115) ...] 
41)
  (defvar gnus-summary-line-format-alist (byte-code 
"\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand ... ... 83 ... ... ... ... ... ... ... 120 ... ... 68 ... ... 
... ... 77 ... ... 114 ... ... ... ... ... 90 or gnus-macroexpand-all ... ... 
... 71 ... ... ... 103 ... ... ... ... ... ... ... ... ... ... ...] 41) 
("c:/home/sva/src/gnus/lisp/gnus-sum.elc" . 50958))
  require(gnus-sum)
  byte-code("\300\301!\204\302\301\303\"\210\304\305!\210\304\306!\207" 
[fboundp declare-function defalias (macro . #[... "\300\207" [nil] 1]) require 
gnus gnus-sum] 3)
  gnus-cache-open()
  gnus-setup-news(nil nil nil)
  byte-code("\204    \204\306 \210\202L\307\310!\210\311\n!\f\204
\203!\312 \210\313\314#\210\307\315!\210\2036\316\317\320\"\210\321 
\210\322!\210\323 \210\324\325!\210\326 \210\307\327!\210\314\207" 
[dont-connect did-connect gnus-startup-file gnus-current-startup-file 
gnus-slave gnus-use-dribble-file gnus-group-quit gnus-run-hooks 
gnus-startup-hook gnus-make-newsrc-file gnus-dribble-read-file gnus-setup-news 
nil gnus-setup-news-hook gnus-request-create-group "queue" (nndraft "") 
gnus-start-draft-setup gnus-group-list-groups gnus-group-first-unread-group 
gnus-configure-windows group gnus-group-set-mode-line gnus-started-hook level 
gnus-agent] 4)
  gnus-1(nil nil nil)
  gnus()
  funcall(gnus)
  (if (get-buffer buffer) (switch-to-buffer buffer) (funcall function))
  (if (equal (buffer-name ...) buffer) (bury-buffer) (if (get-buffer buffer) 
(switch-to-buffer buffer) (funcall function)))
  switch-or-start(gnus "*Group*")
  (lambda nil (interactive) (switch-or-start (quote gnus) "*Group*"))()
  call-interactively((lambda nil (interactive) (switch-or-start (quote gnus) 
"*Group*")) nil nil)
  recursive-edit()
  byte-code("\306      
@\307=\203!\310\311\312\"\210\313\311!\211A@)\242\314=\203!\310\315\312\"\210\316
!\210\317 \210\320 !\210\f\203d\321ed\"
V\203Web\210\322
\245y\210`db\210\322
\245
Zy\210`|\210)\323c\210eb\210\324\325\326 
\"\210\327\306!\210\324\330!\210\331\312\324\330!\210\212\332 
\210+\331\207" [unread-command-char debugger-args x debugger-buffer 
noninteractive debugger-batch-max-lines -1 debug backtrace-debug 4 t 
backtrace-frame lambda 5 pop-to-buffer debugger-mode debugger-setup-buffer 
count-lines 2 "...\n" message "%s" buffer-string kill-emacs "" nil 
recursive-edit middlestart buffer-read-only standard-output] 4)
  debug(error (void-function gnus-macroexpand-all))
  gnus-macroexpand-all((nnir-article-rsv (mail-header-number gnus-tmp-header)))
  
byte-code("\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand (mail-header-number gnus-tmp-header) (100) 83 
(mail-header-subject gnus-tmp-header) (115) (115 gnus-tmp-subject-or-nil 115) 
(110 gnus-tmp-name 115) (65 (car ...) 115) (97 (or ... gnus-tmp-from) 115) (70 
gnus-tmp-from 115) 120 (mail-header-xref gnus-tmp-header) (115) 68 
(mail-header-date gnus-tmp-header) (115) (100 (gnus-dd-mmm ...) 115) (111 
(gnus-date-iso8601 ...) 115) 77 (mail-header-id gnus-tmp-header) (115) 114 
(mail-header-references gnus-tmp-header) (115) (99 (or ... 0) 100) (107 
(gnus-summary-line-message-size gnus-tmp-header) 115) (76 gnus-tmp-lines 115) 
90 or gnus-macroexpand-all (nnir-article-rsv (mail-header-number 
gnus-tmp-header)) (0) (100) 71 (nnir-article-group (mail-header-number 
gnus-tmp-header)) ("") (115) 103 (gnus-group-short-name (nnir-article-group 
...)) ("") (115) (79 gnus-tmp-downloaded 99) (73 gnus-tmp-indentation 115) (84 
(if ... "" ...) 115) (82 gnus-tmp-replied 99) (91 gnus-tmp-opening-bracket 99) 
(93 gnus-tmp-closing-bracket 99) (62 (make-string gnus-tmp-level 32) 115) ...] 
41)
  (defvar gnus-summary-line-format-alist (byte-code 
"\300\301\302!\303BB\304\301\305!\306BB\307\310\311\312\313\314\301\315!\316BB\317\301\320!\321BB\322\323\324\301\325!\326BB\327\301\330!\331BB\332\333\334\335\336\337\340!\341BB\342BB\343\336\337\344!\345BB\346BB\347\336\337\350!\351BB\352BB\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\301\377!D\201@BB\257&\207"
 [78 macroexpand ... ... 83 ... ... ... ... ... ... ... 120 ... ... 68 ... ... 
... ... 77 ... ... 114 ... ... ... ... ... 90 or gnus-macroexpand-all ... ... 
... 71 ... ... ... 103 ... ... ... ... ... ... ... ... ... ... ...] 41) 
("c:/home/sva/src/gnus/lisp/gnus-sum.elc" . 50958))
  require(gnus-sum)
  byte-code("\300\301!\204\302\301\303\"\210\304\305!\210\304\306!\207" 
[fboundp declare-function defalias (macro . #[... "\300\207" [nil] 1]) require 
gnus gnus-sum] 3)
  gnus-cache-open()
  gnus-setup-news(nil nil nil)
  byte-code("\204    \204\306 \210\202L\307\310!\210\311\n!\f\204
\203!\312 \210\313\314#\210\307\315!\210\2036\316\317\320\"\210\321 
\210\322!\210\323 \210\324\325!\210\326 \210\307\327!\210\314\207" 
[dont-connect did-connect gnus-startup-file gnus-current-startup-file 
gnus-slave gnus-use-dribble-file gnus-group-quit gnus-run-hooks 
gnus-startup-hook gnus-make-newsrc-file gnus-dribble-read-file gnus-setup-news 
nil gnus-setup-news-hook gnus-request-create-group "queue" (nndraft "") 
gnus-start-draft-setup gnus-group-list-groups gnus-group-first-unread-group 
gnus-configure-windows group gnus-group-set-mode-line gnus-started-hook level 
gnus-agent] 4)
  gnus-1(nil nil nil)
  gnus()
  funcall(gnus)
  (if (get-buffer buffer) (switch-to-buffer buffer) (funcall function))
  (if (equal (buffer-name ...) buffer) (bury-buffer) (if (get-buffer buffer) 
(switch-to-buffer buffer) (funcall function)))
  switch-or-start(gnus "*Group*")
  (lambda nil (interactive) (switch-or-start (quote gnus) "*Group*"))()
  call-interactively((lambda nil (interactive) (switch-or-start (quote gnus) 
"*Group*")) nil nil)
--8<---------------cut here---------------end--------------->8---

For the sake of completeness, I've checked that the libraries were correctly 
spotted:

  Library is file ~/src/gnus/lisp/gnus.elc
  Library is file ~/src/gnus/lisp/gnus-util.elc
  Library is file ~/src/gnus/lisp/gnus-sum.elc
  Library is file ~/src/gnus/lisp/nnir.elc

Everything seems ok on the load-path front. Though...

Can you help me debug this?

Best regards,
  Seb

-- 
Sebastien Vauban