GNU bug report logs - #16805
24.3.50; url-cookie-write-file: set print-length

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 16805 in the body.
You can then email your comments to 16805 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: raman <tv.raman.tv <at> gmail.com>
To: bug-gnu-emacs <at> gnu.org
Subject: 24.3.50; url-cookie-write-file: set print-length 
Date: Tue, 18 Feb 2014 18:39:15 -0800

This has bitten me a few times because  I  use W3 and now EWW
heavily.

When url-cookie-write-file persists cookies to ~/.url/cookies in
function url-cookie-write-file we need to let-bind print-length
and p

rint-depth -- otherwise, when the cookie list gets long, it gets
saved badly with "..." and this leads to any use of the url
package bombing.


In GNU Emacs 24.3.50.2 (i686-pc-linux-gnu, GTK+ Version 2.16.1)
 of 2014-02-01 on labrador
Repository revision: %N
System Description:	Ubuntu 9.04

Configured using:
 `configure --prefix=/usr/local'

Important settings:
  value of $LANG: en_US.UTF-8
  locale-coding-system: utf-8-unix

Major mode: WWW

Minor modes in effect:
  recentf-mode: t
  csv-field-index-mode: t
  gpm-mouse-mode: t
  global-semantic-idle-summary-mode: t
  global-semanticdb-minor-mode: t
  semantic-mode: t
  savehist-mode: t
  ido-everywhere: t
  display-time-mode: t
  auto-insert-mode: t
  jabber-activity-mode: t
  jabber-mode-line-mode: t
  erc-list-mode: t
  erc-menu-mode: t
  erc-autojoin-mode: t
  erc-ring-mode: t
  erc-networks-mode: t
  erc-pcomplete-mode: t
  erc-track-mode: t
  erc-match-mode: t
  erc-button-mode: t
  erc-fill-mode: t
  erc-stamp-mode: t
  erc-netsplit-mode: t
  erc-irccontrols-mode: t
  erc-noncommands-mode: t
  erc-move-to-prompt-mode: t
  erc-readonly-mode: t
  dynamic-completion-mode: t
  dired-omit-mode: t
  desktop-save-mode: t
  shell-dirtrack-mode: t
  global-voice-lock-mode: t
  voice-lock-mode: t
  tooltip-mode: t
  mouse-wheel-mode: t
  file-name-shadow-mode: t
  global-font-lock-mode: t
  auto-composition-mode: t
  auto-encryption-mode: t
  auto-compression-mode: t
  transient-mark-mode: t

Recent input:
c d RET C-e m C-x @ h s c d RET a m f SPC 9 0 RET C-e 
? n t i l a m o o k SPC s a n SPC j o s e RET q C-e 
? n s o u t h SPC s a n SPC j o s e RET f RET ' f f 
f f f C-u k C-x C-j C-j A a r TAB RET ESC > C-y RET 
ESC [ [ C ESC m C-n C-n C-e e ESC b ESC b ESC f C-e 
w C-n ESC n ESC n ESC n n ESC n ESC n f C-u k C-x C-j 
C-j A a r TAB RET ESC > C-y RET ESC [ [ C b b ESC n 
f e p C-s 6 0 0 ESC m ESC f ESC f ESC f C-e w ESC b 
ESC b ESC f C-e w C-@ ESC f ESC f ESC b ESC b C-@ ESC 
f ESC f ESC f ESC w C-x @ h e w C-y SPC s a n SPC j 
o s e SPC 9 5 1 2 3 ESC m 6 0 0 SPC ESC > RET C-n C-n 
C-n C-n C-n C-n C-n C-n C-n C-n C-e s q ESC n q C-e 
s C-x @ h m C-e s C-e m , ESC < C-n C-n k k k k k k 
k k k k k k k k k q C-x m e m a c s - d e v e l @ g 
n u s ESC b ESC b ESC b C-k ESC [ [ D n ESC x r e p 
o r t SPC e m a TAB b TAB RET

Recent messages:
Sorting for index file...
Stuffing index file...
Writing index file...
Wrote /home/raman/.mbox.idx
Writing index file... done
Composing a message
Save `mail to emacs-devel_gnus on ""' as draft in folder `postponed'? (y or n)  n
`mail to emacs-devel_gnus on ""' is gone forever!
Quit  [2 times]
End of buffer  [2 times]

Load-path shadows:
/home/raman/.emacs.d/elpa/company-20131101.302/.dir-locals hides /home/raman/.emacs.d/elpa/js2-mode-20131119.116/.dir-locals
/home/raman/.emacs.d/elpa/company-20131101.302/.dir-locals hides /home/raman/.emacs.d/elpa/kill-ring-search-20110605.1744/.dir-locals
/home/raman/.emacs.d/elpa/google-this-20131031.1015/noflet hides /home/raman/.emacs.d/elpa/noflet-20130901.1722/noflet
/home/raman/emacs/lisp/site-lisp/gm/g-utils hides /home/raman/emacs/lisp/emacspeak/lisp/g-client/g-utils
/home/raman/emacs/lisp/site-lisp/vm/lisp/tapestry hides /home/raman/emacs/lisp/emacspeak/lisp/tapestry
/home/raman/.emacs.d/elpa/apt-utils-20130824.1200/apt-utils hides /home/raman/emacs/lisp/site-lisp/apt-utils
/home/raman/.emacs.d/elpa/fold-dwim-20120926.1236/fold-dwim hides /home/raman/emacs/lisp/site-lisp/fold-dwim
/home/raman/.emacs.d/elpa/xml-rpc-20130423.1656/xml-rpc hides /home/raman/emacs/lisp/site-lisp/xml-rpc
/home/raman/emacs/lisp/emacspeak/lisp/tetris hides /usr/local/share/emacs/24.3.50/lisp/play/tetris
/home/raman/.emacs.d/elpa/company-20131101.302/.dir-locals hides /usr/local/share/emacs/24.3.50/lisp/gnus/.dir-locals
/home/raman/.emacs.d/elpa/emms-20131016.1232/tq hides /usr/local/share/emacs/24.3.50/lisp/emacs-lisp/tq
/home/raman/.emacs.d/elpa/tabulated-list-20120406.2251/tabulated-list hides /usr/local/share/emacs/24.3.50/lisp/emacs-lisp/tabulated-list

Features:
(emacspeak-websearch vm-w3m apropos shr-color color shadow
emacsbug eieio-opt emacspeak-speedbar speedbar sb-image dframe
pulse semantic/analyze semantic/sort semantic/scope
semantic/analyze/fcn finder-inf org-rmail org-mhe org-irc
org-info org-gnus org-docview org-bibtex emacspeak-bibtex bibtex
org-bbdb org-w3m org-capture etags tramp-cache gm-nnir canlock
vm-save vm-mark jabber-rtt goto-addr emacspeak-tapestry gnus-dup
rect gnus-bcklg qp debug dabbrev emacspeak-bbc w3-style
jabber-bookmarks emacspeak-proced proced recentf tree-widget
gnus-cite gnus-async gnus-ml url-queue emacspeak-eww eww mm-url
shr misearch multi-isearch ffap nndraft nnmh gnus-agent gnus-srvr
gnus-score score-mode nnvirtual gnus-msg nnfolder utf-7
gnus-cache vc-rcs gnus-prepare emacspeak-supercite supercite regi
ediff-ptch ediff-merg emacspeak-ediff ediff-wind ediff-diff
ediff-mult ediff-help ediff-init ediff-util ediff epa-file
emacspeak-flyspell flyspell emacspeak-ispell ispell vm-digest
vm-reply pcmpl-unix vm-virtual emacspeak-hide vm-sort vm-delete
tapestry vm-rfaddons vm-menu vm-window vm-toolbar vm-mouse
vm-page vm-minibuf emacspeak-vm vm w3-imenu emacspeak-imenu imenu
w3-speak-table w3-structure w3-hot mm-archive url-file url-dired
w3-toolbar w3-speak w3-forms w3-emacs w3-props network-stream
url-http url-gw url-cache url-auth emacspeak-url-template
csv-mode amixer emacspeak-wizards emacspeak-eterm term ehelp
emacspeak-texinfo texinfo emacspeak-table-ui emacspeak-table
emacspeak-find-dired find-dired eldoc lisp-mnt t-mouse cal-china
lunar cal-bahai cal-islam cal-hebrew holidays hol-loaddefs gcal
g-app g-auth mule-util cal-move server emms-info-libtag
emms-bookmarks emms-lastfm-client emms-cue emms-mode-line-icon
emms-browser sort emms-playlist-sort emms-last-played
emms-player-xine emms-player-mpd tq emms-playing-time emms-lyrics
emms-url emms-streams emms-tag-editor emms-mark emms-mode-line
emms-cache emms-info-ogginfo emms-info-mp3info emms-info later-do
emms-playlist-mode emms-player-vlc emms-player-mplayer
emms-player-simple emms-source-playlist emms-source-file
emms-setup emacspeak-emms emms emms-compat emacspeak-reftex
reftex reftex-vars Save-visited-files-autoloads emacspeak-auctex
tex-site bm-autoloads charmap cljdoc-autoloads
clojure-project-mode-autoloads clojurescript-mode-autoloads
closure-lint-mode-autoloads closure-template-html-mode-autoloads
color-theme-autoloads control-lock-autoloads cppcheck-autoloads
crontab-mode-autoloads dired-isearch-autoloads dizzee-autoloads
doc-mode-autoloads dotassoc-autoloads durendal-autoloads
echo-pick-autoloads eimp-autoloads elisp-cache-autoloads
enwc-autoloads epoch-view-autoloads eshell-info-autoloads
find-file-in-project-autoloads find-file-in-repository-autoloads
fold-dwim-autoloads gnomenm-autoloads gopher-autoloads
heap-autoloads http-twiddle-autoloads iflipb-autoloads
inflections-autoloads ioccur-autoloads js-comint-autoloads
key-chord-autoloads kill-ring-search-autoloads letcheck-autoloads
logito-autoloads macro-math-autoloads magnet-autoloads
markchars-autoloads marmalade-autoloads furl-autoloads
maxframe-autoloads memory-usage-autoloads minimap-autoloads
mustache-mode-autoloads my-packages-autoloads nav-autoloads
oauth-autoloads otp-autoloads emacspeak-info info
project-autoloads project-mode-autoloads levenshtein-autoloads
protobuf-mode-autoloads pylint-autoloads pysmell-autoloads
python-mode-autoloads quarter-plane-autoloads queue-autoloads
register-list-autoloads scratch-autoloads session-autoloads
shadchen-autoloads shell-here-autoloads edmacro emacspeak-kmacro
kmacro slime-repl-autoloads slime-autoloads
ssh-config-mode-autoloads tabkey2-autoloads
tabula-rasa-mode-autoloads texdrive-autoloads
thumb-through-autoloads tidy-autoloads unbound-autoloads
watch-buffer-autoloads wget-autoloads workspaces-autoloads
wtf-autoloads xml-gen-autoloads package emacs-startup
semantic/idle semantic/format ezimage semantic/tag-ls
semantic/find semantic/ctxt semantic/db-mode semantic/db
eieio-base saveplace midnight emacspeak-cedet semantic/util-modes
semantic/util semantic semantic/tag semantic/lex semantic/fw
mode-local cedet savehist emacspeak-ido ido time autoinsert
emacspeak-gm gm tramp tramp-compat tramp-loaddefs trampver
emacspeak-twittering twittering-mode epa epg ssl emacspeak-jabber
jabber jabber-libnotify jabber-awesome jabber-osd jabber-wmii
jabber-xmessage jabber-festival jabber-sawfish jabber-ratpoison
jabber-tmux jabber-screen jabber-socks5 jabber-ft-server
jabber-si-server jabber-ft-client jabber-ft-common
jabber-si-client jabber-si-common jabber-feature-neg
jabber-truncate jabber-time jabber-autoaway jabber-vcard-avatars
jabber-chatstates jabber-events jabber-vcard jabber-avatar
jabber-activity jabber-watch jabber-modeline jabber-ahc-presence
jabber-ahc jabber-version jabber-ourversion
jabber-muc-nick-completion hippie-exp jabber-browse jabber-search
jabber-register jabber-roster jabber-private jabber-presence
jabber-muc jabber-muc-nick-coloring hexrgb jabber-widget
jabber-disco jabber-chat jabber-history jabber-chatbuffer
jabber-alert jabber-iq jabber-core jabber-console
emacspeak-sgml-mode sgml-mode ewoc jabber-keymap jabber-sasl sasl
sasl-anonymous sasl-login sasl-plain fsm jabber-logon jabber-conn
srv dns starttls gnutls jabber-xml jabber-menu jabber-util
jabber-autoloads erc-list erc-menu erc-join erc-ring erc-networks
erc-pcomplete erc-track erc-match erc-button erc-fill erc-stamp
erc-netsplit emacspeak-erc erc-goodies erc erc-backend erc-compat
pp emacspeak-org org org-macro org-footnote org-pcomplete
org-list org-faces org-entities emacspeak-outline foldout
noutline outline easy-mmode org-version ob-emacs-lisp ob
ob-tangle org-src ob-ref ob-lob ob-table ob-keys ob-exp ob-comint
ob-core ob-eval org-compat org-macs org-loaddefs
emacspeak-find-func find-func emacspeak-calendar appt diary-lib
diary-loaddefs solar cal-dst cal-menu calendar cal-loaddefs
emacspeak-tcl tcl emacspeak-folding folding emacspeak-w3m
w3m-form emacspeak-m-player w3m doc-view jka-compr image-mode
w3m-hist w3m-fb bookmark-w3m w3m-ems w3m-ccl ccl w3m-favicon
w3m-image w3m-proc w3m-util w3-prepare w3 w3-menu w3-emulate
w3-auto w3-parse w3-fast-parse emacspeak-w3 emacspeak-google
html2text gmaps emacspeak-we emacspeak-xslt w3-display w3-mouse
w3-imap url-handlers w3-widget w3-vars w3-keymap w3-cus css font
disp-table devices ange-ftp w3-cfg w3-compat emacspeak-sigbegone
sigbegone emacspeak-custom cus-edit cus-start smtpmail sendmail
gnus-demon nntp nnir nnimap parse-time tls utf7 netrc
emacspeak-gnus gnus-art mm-uu mml2015 epg-config mm-view
mml-smime smime dig gnus-sum nnoo gnus-group gnus-undo nnmail
mail-source gnus-start gnus-spec gnus-int gnus-range
emacspeak-message message format-spec mml mml-sec mm-decode
mm-bodies mm-encode gmm-utils mailheader gnus-win gnus gnus-ems
nnheader mail-utils emacspeak-mspools mspools bbdb-vm vm-mime
vm-folder vm-summary vm-motion vm-undo vm-misc bbdb-snarf
mail-extr rfc822 bbdb-hooks mail-parse rfc2231 rfc2047 rfc2045
ietf-drums bbdb-autoloads bbdb-com mailabbrev emacspeak-bbdb bbdb
timezone vm-pine vm-macro vm-message vm-autoloads vm-vars
vm-version my-functions completion dired-aux dired-x
emacspeak-dired emacspeak-desktop desktop frameset dired
emacspeak-aumix emacspeak-forms forms-mode forms emacspeak-setup
emacspeak-dbus nm dbus xml emacspeak-webspace emacspeak-webutils
browse-url url url-proxy url-privacy url-expand url-methods
url-history url-cookie url-domsuf url-util url-parse auth-source
eieio eieio-core gnus-util mm-util mail-prsvr password-cache
url-vars mailcap gweb gfeeds g-utils json emacspeak-alsaplayer
emacspeak-amark derived emacspeak-advice shell pcomplete comint
ring emacspeak-ansi-color ansi-color emacspeak-replace
emacspeak-redefine emacspeak-personality emacspeak
emacspeak-widget warnings wid-edit emacspeak-facemenu
emacspeak-fix-interactive emacspeak-buff-menu g-cus-load cus-load
emacspeak-preamble emacspeak-keymap emacspeak-speak time-date
emacspeak-pronounce thingatpt dtk-speak flite-voices dtk-interp
voice-setup emacspeak-sounds dectalk-voices espeak-voices
mac-voices multispeech-voices outloud-voices dtk-unicode byte-opt
bytecomp byte-compile cconv descr-text help-mode easymenu
dtk-css-speech acss-structure emacspeak-load-path advice help-fns
vc-git vc-dispatcher vc-svn cl-macs gv cl cl-loaddefs cl-lib
tooltip electric uniquify ediff-hook vc-hooks lisp-float-type
mwheel x-win x-dnd tool-bar dnd fontset image regexp-opt fringe
tabulated-list newcomment lisp-mode prog-mode register page
menu-bar rfn-eshadow timer select scroll-bar mouse jit-lock
font-lock syntax facemenu font-core frame cham georgian
utf-8-lang misc-lang vietnamese tibetan thai tai-viet lao korean
japanese hebrew greek romanian slovak czech european ethiopic
indian cyrillic chinese case-table epa-hook jka-cmpr-hook help
simple abbrev minibuffer nadvice loaddefs button faces cus-face
macroexp files text-properties overlay sha1 md5 base64 format env
code-pages mule custom widget hashtable-print-readable backquote
make-network-process dbusbind inotify dynamic-setting
system-font-setting font-render-setting move-toolbar gtk
x-toolkit x multi-tty emacs)

Message #8 received at 16805 <at> debbugs.gnu.org (full text, mbox):

From: Ivan Shmakov <ivan <at> siamics.net>
To: 16805 <at> debbugs.gnu.org
Subject: Re: bug#16805: 24.3.50; url-cookie-write-file: set print-length 
Date: Tue, 13 Jan 2015 18:07:52 +0000

[Message part 1 (text/plain, inline)]

>>>>> raman <tv.raman.tv <at> gmail.com> writes:

[…]

 > When url-cookie-write-file persists cookies to ~/.url/cookies in
 > function url-cookie-write-file we need to let-bind print-length and p
 > rint-depth -- otherwise, when the cookie list gets long, it gets
 > saved badly with "..." and this leads to any use of the url package
 > bombing.

	I believe I’ve managed to stumble upon this myself, and was able
	to successfully overcome the issue with the patch MIMEd.

	* lisp/url/url-cookie.el
	(url-cookie-write-file): Let-bind print-length and print-level
	to nil to avoid writing a garbled list.

-- 
FSF associate member #7257  http://boycottsystemd.org/  … 3013 B6A0 230E 334A

[Message part 2 (text/diff, inline)]

--- a/lisp/url/url-cookie.el
+++ b/lisp/url/url-cookie.el
@@ -104,9 +104,10 @@ defun url-cookie-write-file (&optional fname)
       (insert ";; Emacs-W3 HTTP cookies file\n"
 	      ";; Automatically generated file!!! DO NOT EDIT!!!\n\n"
 	      "(setq url-cookie-storage\n '")
-      (pp url-cookie-storage (current-buffer))
-      (insert ")\n(setq url-cookie-secure-storage\n '")
-      (pp url-cookie-secure-storage (current-buffer))
+      (let ((print-length nil) (print-level nil))
+	(pp url-cookie-storage (current-buffer))
+	(insert ")\n(setq url-cookie-secure-storage\n '")
+	(pp url-cookie-secure-storage (current-buffer)))
       (insert ")\n")
       (insert "\n;; Local Variables:\n"
               ";; version-control: never\n"

Message #11 received at 16805 <at> debbugs.gnu.org (full text, mbox):

From: Stefan Monnier <monnier <at> iro.umontreal.ca>
To: 16805 <at> debbugs.gnu.org
Subject: Re: bug#16805: 24.3.50; url-cookie-write-file: set print-length
Date: Tue, 13 Jan 2015 14:59:11 -0500

> 	I believe I’ve managed to stumble upon this myself, and was able
> 	to successfully overcome the issue with the patch MIMEd.

Looks good, thanks,


        Stefan "yes, we have kind of mess in this print-* dynbind
                configuration of the printing system.  Someone already
                suggested we provide a `with-default-print-config' macro
                as a first step to sanity."

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.