a strange error with list-registers (and better-registers)

[Uwe Brauer <oub@mat.ucm.es>]

[-- Attachment #1: Type: text/plain, Size: 1964 bytes --]


Hi 

I am running GNU emacs master from a couple of weeks ago. I very
frequently use list-registers (and better-registers to save these
registers (require 'better-registers) ;Version:1.175
(better-registers-install-save-registers-hook) (load
better-registers-save-file)

better-registers-save-file is a variable defined in ‘better-registers.el’.

Its value is "~/.emacsregisters.el"



Now the point is when I restart emacs, sometimes it complains about the
content of that register file. I solve this issue by deleting this
specific register entry, it seems somehow a problem that is connected
with the fonts used. Frankely the entry looks very boated and containing
unnecessary  information (I have seen also bloated information in my
.abbrev but not to this extend

May be somebody who is acquainted with this sort of information give me
a hint.
Here comes the bug trace
,----
| 
| Debugger entered--Lisp error: (invalid-read-syntax "#" 1 0)
|   read(#<buffer  *load*>)
|   edebug--read(read #<buffer  *load*>)
|   apply(edebug--read read #<buffer  *load*>)
|   #f(advice-wrapper :around read edebug--read)(#<buffer  *load*>)
|   eval-buffer(#<buffer  *load*> nil "/home/oub/ALLES/HGs/init_files/.emacsregisters.el" nil t)  ; Reading at buffer position 27963
|   load-with-code-conversion("/home/oub/ALLES/HGs/init_files/.emacsregisters.el" "/home/oub/ALLES/HGs/init_files/.emacsregisters.el" nil nil)
|   load("/home/oub/ALLES/HGs/init_files/.emacsregisters.el" nil nil t)
|   load-file("~/ALLES/HGs/init_files/.emacsregisters.el")
|   funcall-interactively(load-file "~/ALLES/HGs/init_files/.emacsregisters.el")
|   call-interactively(load-file nil nil)
|   command-execute(load-file)
| 
`----

Caused  by: file attached


Regards

Uwe Brauer 


-- 
I strongly condemn Putin's war of aggression against the Ukraine.
I support to deliver weapons to Ukraine's military. 
I support the ban of Russia from SWIFT.
I support the EU membership of the Ukraine. 

[-- Attachment #2: bug-reg.txt --]
[-- Type: text/plain, Size: 5295 bytes --]


(set-register 49 #(">
>
>>>> 
>> Hola, tienes que utilizar el mismo número de clases que el año anterior. Si


[[End of S/MIME Signed Part]]
" 0 39 (fontified t) 39 59 (fontified t mouse-face highlight gnus-callback gnus-button-push button-data (#<marker in no buffer> (gnus-button-mid-or-mail-regexp 0 (>= gnus-button-message-level 5) gnus-button-handle-mid-or-mail 1)) action gnus-button-push keymap (keymap (menu-bar keymap (url\ button menu-item "Url Button" (keymap "Url Button" (Copy\ URL\ to\ kill\ ring menu-item "Copy URL to kill ring" gnus-article-copy-string) (Push\ the\ button menu-item "Push the button" push-button) (Push\ the\ button-2 menu-item "Push the button" push-button)))) (mouse-2 . push-button) (13 . push-button) (117 . gnus-article-copy-string)) follow-link t category t button t gnus-data (#<marker in no buffer> (gnus-button-mid-or-mail-regexp 0 (>= gnus-button-message-level 5) gnus-button-handle-mid-or-mail 1)
 ) gnus-string "pyustosc@quim.ucm.es") 59 61 (fontified t) 61 68 (fontified t mouse-face highlight gnus-callback gnus-cite-toggle button-data ">         mié>" action gnus-cite-toggle keymap (keymap (menu-bar keymap (url\ button menu-item "Url Button" (keymap "Url Button" (Copy\ URL\ to\ kill\ ring menu-item "Copy URL to kill ring" gnus-article-copy-string) (Push\ the\ button menu-item "Push the button" push-button) (Push\ the\ button-2 menu-item "Push the button" push-button)))) (mouse-2 . push-button) (13 . push-button) (117 . gnus-article-copy-string)) follow-link t category t button t gnus-data ">         mié>") 68 437 (fontified t) 437 439 (fontified t composition (0 2 [8211]) prettify-symbols-start 922 prettify-symbols-end 924) 439 548 (fontified t) 548 550 (fontified t composition
  (0 2 [8211]) prettify-symbols-start 1033 prettify-symbols-end 1035) 550 1016 (fontified t) 1016 1496 (fontified t) 1496 1532 (fontified t) 1532 1534 (fontified t) 1534 1542 (fontified t) 1542 1544 (gnus-undeletable t fontified t) 1544 1573 (mouse-face highlight gnus-face t keymap (keymap (menu-bar keymap (security\ part menu-item "Security Part" (keymap "Security Part" (Show\ Detail menu-item "Show Detail" gnus-article-press-button) (Save\.\.\. menu-item "Save..." gnus-mime-security-save-part) (Pipe\ To\ Command\.\.\. menu-item "Pipe To Command..." gnus-mime-security-pipe-part)))) (46 . undefined) (124 . gnus-mime-security-pipe-part) (112 . undefined) (101 . undefined) (69 . undefined) (105 . undefined) (99 . undefined) (100 . undefined) (114 . undefined) (15 . undefined) (111 . gnus-mi
 me-security-save-part) (67 . undefined) (116 . undefined) (118 . undefined) (down-mouse-3 . gnus-mime-security-button-menu) (mouse-2 . gnus-article-push-button) (13 . gnus-article-press-button)) gnus-callback gnus-mime-security-press-button gnus-line-format "%{%([[End of %t]%D]%)%}
" gnus-mime-details nil article-type annotation follow-link t gnus-data (#("multipart/signed" 0 16 (boundary "------------ms010902040307040206030803" micalg "sha-256" protocol "application/pkcs7-signature" buffer #<killed buffer> from nil start nil gnus-info "Good signature from B35B4D57118F84C37E39E17DBEF1AC2F371972D9 /CN=PONS BORDERIA MARIA JESUS - 22694731X/C=ES/SN=PONS BORDERIA/GN=MARIA JESUS/SerialNumber=IDCES-22694731X (trust full)" gnus-region (#<marker in no buffer> . #<marker in no buffer>))) (#<killed buffer> ("text/plain" (format . "flowed") (charset . "UTF-8")) quoted-printable nil ("inline") nil nil nil) (#<killed buffer> ("application/pkcs7-signature" (name . "smime.p7s")) base64 nil ("attachment" (filename . "smime.p7s")) "S/MIME Cryptographic Signature" nil nil)) button (t)
  category default-button fontified t) 1573 1574 (keymap (keymap (menu-bar keymap (security\ part menu-item "Security Part" (keymap "Security Part" (Show\ Detail menu-item "Show Detail" gnus-article-press-button) (Save\.\.\. menu-item "Save..." gnus-mime-security-save-part) (Pipe\ To\ Command\.\.\. menu-item "Pipe To Command..." gnus-mime-security-pipe-part)))) (46 . undefined) (124 . gnus-mime-security-pipe-part) (112 . undefined) (101 . undefined) (69 . undefined) (105 . undefined) (99 . undefined) (100 . undefined) (114 . undefined) (15 . undefined) (111 . gnus-mime-security-save-part) (67 . undefined) (116 . undefined) (118 . undefined) (down-mouse-3 . gnus-mime-security-button-menu) (mouse-2 . gnus-article-push-button) (13 . gnus-article-press-button)) gnus-callback gnus-mime-securit
 y-press-button gnus-line-format "%{%([[End of %t]%D]%)%}
" gnus-mime-details nil article-type annotation follow-link t gnus-data (#("multipart/signed" 0 16 (boundary "------------ms010902040307040206030803" micalg "sha-256" protocol "application/pkcs7-signature" buffer #<killed buffer> from nil start nil gnus-info "Good signature from B35B4D57118F84C37E39E17DBEF1AC2F371972D9 /CN=PONS BORDERIA MARIA JESUS - 22694731X/C=ES/SN=PONS BORDERIA/GN=MARIA JESUS/SerialNumber=IDCES-22694731X (trust full)" gnus-region (#<marker in no buffer> . #<marker in no buffer>))) (#<killed buffer> ("text/plain" (format . "flowed") (charset . "UTF-8")) quoted-printable nil ("inline") nil nil nil) (#<killed buffer> ("application/pkcs7-signature" (name . "smime.p7s")) base64 nil ("attachment" (filename . "smime.p7s")) "S/MIME Cryptographic Signature" nil nil)) fontified 
 t)))