Re: Yanking as HTML

[Stephen Berman]

On Sun, 30 Oct 2016 12:08:19 +0100 Lars Ingebrigtsen <address@hidden> wrote:

> Andreas Schwab <address@hidden> writes:
>
>> What do you get from (x-get-selection-internal 'CLIPBOARD 'text/html)?
>
> nil

When I select a region of a browser page,
e.g. http://www.gnu.org/software/emacs/, with the mouse and type C-c,
then switch to *scratch* in Emacs, which already contains the above sexp
with point at the closing paren, and type C-j, I get this (displayed
here with line breaks for legibility instead of as a single line):

#("<div class=\"logo\" style=\"margin: 0px; padding: 0px; border: 0px;
 font-family: 'fira sans', sans; font-size: 18px; font-style: normal;
 font-variant: normal; font-weight: normal; line-height: 26px;
 vertical-align: baseline; overflow: hidden; text-align: center;
 z-index: 1; color: rgb(63, 59, 59); letter-spacing: normal; orphans: 2;
 text-indent: 0px; text-transform: none; white-space: normal; widows: 2;
 word-spacing: 0px; -webkit-text-size-adjust: auto;
 -webkit-text-stroke-width: 0px; background-color: rgb(245, 245,
 237);\"><a href=\"http://www.gnu.org/software/emacs/emacs.html\";
 style=\"margin: 0px; padding: 0px; border: 0px; font-family: inherit;
 font-size: inherit; font-style: inherit; font-variant: inherit;
 font-weight: inherit; line-height: inherit; vertical-align: baseline;
 color: rgb(118, 49, 159); text-decoration: none;\"><img
 src=\"http://www.gnu.org/software/emacs/images/emacs.png\";
 alt=\"Emacs\" style=\"margin: 0px; padding: 0px; border: 0px;
 font-family: inherit; font-size: inherit; font-style: inherit;
 font-variant: inherit; font-weight: inherit; line-height: inherit;
 vertical-align: top; max-height: 100px;\"></a><span
 class=\"Apple-converted-space\">\302\240</span><h1 style=\"margin: 0px
 10px; padding: 0px; border: 0px; font-family: inherit; font-size: 4em;
 font-style: inherit; font-variant: inherit; font-weight: 600;
 line-height: 110px; vertical-align: baseline; display: inline;\">GNU
 Emacs</h1></div><h2 style=\"margin: 20px auto 10px; padding: 0px;
 border: 0px; font-family: 'fira sans', sans; font-size: 2.6em;
 font-style: normal; font-variant: normal; font-weight: 300;
 line-height: 1.3em; vertical-align: baseline; z-index: 1; text-align:
 center; max-width: 760px; color: rgb(63, 59, 59); letter-spacing:
 normal; orphans: 2; text-indent: 0px; text-transform: none;
 white-space: normal; widows: 2; word-spacing: 0px;
 -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px;
 background-color: rgb(245, 245, 237);\">An extensible, customizable,<a
 href=\"http://www.gnu.org/philosophy/free-sw.html\"; style=\"margin:
 0px; padding: 0px; border: 0px; font-family: inherit; font-size:
 inherit; font-style: inherit; font-variant: inherit; font-weight:
 inherit; line-height: inherit; vertical-align: baseline; color:
 rgb(118, 49, 159); text-decoration: none;\">free/libre</a><span
 class=\"Apple-converted-space\">\302\240</span>text editor \342\200\224
 and more.</h2>" 0 2360 (foreign-selection STRING))

Steve Berman