bug-gnu-emacs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

bug#31351: 27.0; Cannot send bug report with Outlook if text includes ba


From: Drew Adams
Subject: bug#31351: 27.0; Cannot send bug report with Outlook if text includes backquoted sexps
Date: Thu, 3 May 2018 13:11:47 -0700 (PDT)

> Could you try patching browse-url.el, and then making a report
> with quotes in the Subject?  That should work after the patch.

I did that, but it did not solve the problem - I get the same error.

I tried with both the original message body and with just aaaaaaa
as the body.  So the Subject line is the problem, and it does not
seem to be fixed by your patch.

This is the code I used:

(defun browse-url-default-windows-browser (url &optional _new-window)
  "Invoke the MS-Windows system's default Web browser.
The optional NEW-WINDOW argument is not used."
  (interactive (browse-url-interactive-arg "URL: "))
  (cond ((eq system-type 'ms-dos)
         (if dos-windows-version
             (shell-command (concat "start " (shell-quote-argument url)))
           (error "Browsing URLs is not supported on this system")))
        ((eq system-type 'cygwin)
         (call-process "cygstart" nil nil nil url))
        (t
         (w32-shell-execute
          "open"
          ;; w32-shell-execute passes file:// URLs
          ;; to APIs that expect file names, so we
          ;; need to unhex any %nn encoded
          ;; characters in the URL.  We don't do
          ;; that for other URLs; in particular,
          ;; default Windows mail client barfs on
          ;; quotes in the MAILTO URLs, so we prefer
          ;; to leave the URL with its embedded %nn
          ;; encoding intact.
          (if (eq t (compare-strings url nil 7
                                     "file://" nil nil))
              (url-unhex-string url)
            url)))))





reply via email to

[Prev in Thread] Current Thread [Next in Thread]