Eliot Miranda uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-eem.1396.mcz

==================== Summary ====================

Name: System-eem.1396
Author: eem
Time: 23 March 2023, 3:56:35.409033 pm
UUID: 53f6b536-39e4-4957-b0b6-5c1958a356b3
Ancestors: System-eem.1395

Add the magic format number (49358, a.k.a. 16rC0CE) used by Chrome and Edge for HTML text copied to the clipboard to ExtendedClipboardWinInterface.

=============== Diff against System-eem.1395 ===============

Item was changed:
  ExtendedClipboardInterface subclass: #ExtendedClipboardWinInterface
  	instanceVariableNames: ''
+ 	classVariableNames: 'CF_BITMAP CF_DIB CF_DIBV5 CF_HDROP CF_HTMLTEXT CF_LOCALE CF_OEMTEXT CF_PALETTE CF_PENDATA CF_PRIVATELAST CF_RIFF CF_TEXT CF_TIFF CF_UNICODETEXT CF_UTF8TEXT CF_WAVE'
- 	classVariableNames: 'CF_BITMAP CF_DIB CF_DIBV5 CF_HDROP CF_LOCALE CF_OEMTEXT CF_PALETTE CF_PENDATA CF_PRIVATELAST CF_RIFF CF_TEXT CF_TIFF CF_UNICODETEXT CF_UTF8TEXT CF_WAVE'
  	poolDictionaries: ''
  	category: 'System-Clipboard'!

Item was changed:
  ----- Method: ExtendedClipboardWinInterface class>>initializeClipboardFormatMap (in category 'class initialization') -----
  initializeClipboardFormatMap
  	"ExtendedClipboardWinInterface initializeClipboardFormatMap"
  	CF_TEXT := 1.
  	CF_BITMAP := 2.
  	"CF_METAFILEPICT := 3.
  	CF_SYLK := 4.
  	CF_DIF := 5."
  	CF_TIFF := 6.
  	CF_OEMTEXT := 7.
  	CF_DIB := 8.
  	CF_PALETTE := 9.
  	CF_PENDATA := 10.
  	CF_RIFF := 11.
  	CF_WAVE := 12.
  	CF_UNICODETEXT := 13.
  	"CF_ENHMETAFILE := 14."
  	CF_HDROP := 15.
  	CF_LOCALE := 16.
  	CF_DIBV5 := 17.
  
  	"CF_OWNERDISPLAY := 16r0080.
  	CF_DSPTEXT := 16r0081.
  	CF_DSPBITMAP := 16r0082.
  	CF_DSPMETAFILEPICT := 16r0083.
  	CF_DSPENHMETAFILE  := 16r008E.
  	CF_PRIVATEFIRST := 16r0200."
  	CF_PRIVATELAST := 16r02FF.
  	CF_UTF8TEXT := CF_PRIVATELAST. "extension to the Windows ClipboardExtendedPlugin..."
  	"CF_GDIOBJFIRST := 16r0300.
  	CF_GDIOBJLAST := 16r03FF."
+ 	CF_HTMLTEXT := 49358. "a.k.a. 16rC0CE this is used by both Chrome and Edge when one selects HTML there-in."
  
  	clipboardFormatMap := Dictionary new.
  	"at: 6 put: 'image/tiff' asMIMEType; CF_TIFF"
  
  	clipboardFormatMap
  		at: 49510 put: 'text/rtf' asMIMEType; 
  		at: 1 put: 'text/plain' asMIMEType; "CF_TEXT"
  		at: 2 put: 'image/bmp' asMIMEType; "CF_BITMAP"
  		at: 12 put: 'audio/wave'; "CF_WAVE"
  		at: 13 put: 'text/unicode' asMIMEType; "CF_UNICODETEXT"
  		at: 16 put: 'CF_LOCALE'; "CF_LOCALE"
  		yourself.
  
  
  !