[squeak-dev] The Trunk: MorphicExtras-nice.151.mcz

Nicolas Cellier nicolas.cellier.aka.nice at gmail.com
Sun Jul 20 20:39:44 UTC 2014


Oups, sorry, I've got a local change on DataStream (use uft8 for storing
Stream) that messed the mcz...
Could someone delete this commit?
I'll issue a new one...


2014-07-20 22:34 GMT+02:00 <commits at source.squeak.org>:

> Nicolas Cellier uploaded a new version of MorphicExtras to project The
> Trunk:
> http://source.squeak.org/trunk/MorphicExtras-nice.151.mcz
>
> ==================== Summary ====================
>
> Name: MorphicExtras-nice.151
> Author: nice
> Time: 20 July 2014, 10:33:57.067 pm
> UUID: 2d247adf-926d-4df7-9733-8aebe93007a0
> Ancestors: MorphicExtras-kfr.150
>
> Don't use RWBinaryOrTextStream where a simple WriteStream would perfectly
> do the job.
>
> =============== Diff against MorphicExtras-kfr.150 ===============
>
> Item was changed:
>   BooklikeMorph subclass: #BookMorph
>         instanceVariableNames: 'pages currentPage'
>         classVariableNames: 'MethodHolders VersionNames VersionTimes'
>         poolDictionaries: ''
>         category: 'MorphicExtras-Books'!
>
>   !BookMorph commentStamp: '<historical>' prior: 0!
>   A collection of pages, each of which is a place to put morphs.  Allows
> one or another page to show; orchestrates the page transitions; offers
> control panel for navigating among pages and for adding and deleting pages.
>
>   To write a book out to the disk or to a file server, decide what folder
> it goes in.  Construct a url to a typical page:
>         file://myDisk/folder/myBook1.sp
>   or
>         ftp://aServer/folder/myBook1.sp
>
>   Choose "send all pages to server" from the book's menu (press the <>
> part of the controls).  Choose "use page numbers".  Paste in the url.
>
>   To load an existing book, find its ".bo" file in the file list browser.
>  Choose "load as book".
>
>   To load an existing book from its url, execute:
> + ¦(URLMorph grabURL: 'ftp://aServer/folder/myBook1.sp') book: true.
> - ¦(URLMorph grabURL: 'ftp://aServer/folder/myBook1.sp') book: true.
>
>   Multiple people may modify a book.  If other people may have changed a
> book you have on your screen, choose "reload all from server".
>
>   Add or modify a page, and choose "send this page to server".
>
>   The polite thing to do is to reload before changing a book.  Then write
> one or all pages soon after making your changes.  If you store a stale
> book, it will wipe out changes that other people made in the mean time.
>
>   Pages may be linked to each other.  To create a named link to a new
> page, type the name of the page in a text area in a page.  Select it and do
> Cmd-6.  Choose 'link to'.  A new page of that name will be added at the
> back of the book.  Clicking on the blue text flips to that page.
>         To create a link to an existing page, first name the page.  Go to
> that page and Cmd-click on it.  The name of the page is below the page.
>  Click in it and backspace and type.  Return to the page you are linking
> from.  Type the name. Cmd-6, 'link to'.
>
>   Text search:  Search for a set of fragments.  allStrings collects text
> of fields.  Turn to page with all fragments on it and highlight the first
> one.  Save the container and offset in properties: #searchContainer,
> #searchOffset, #searchKey.  Search again from there.  Clear those at each
> page turn, or change of search key.
>
>   [rules about book indexes and pages:  Index and pages must live in the
> same directory. They have the same file prefix, followed by .bo for the
> index or 4.sp for a page (or x4.sp).  When a book is moved to a new
> directory, the load routine gets the new urls for all pages and saves those
> in the index.  Book stores index url in property #url.
>       Allow mulitple indexes (books) on the same shared set of pages.  If
> book has a url in same directory as pages, allow them to have different
> prefixes.
>         save all pages first time, save one page first time,
> fromRemoteStream: (first time)
>         save all pages normal , save one page normal, reload
>         where I check if same dir]
>   URLMorph holds url of both page and book.!
>
> Item was changed:
>   ----- Method: BooklikeMorph>>fullControlSpecs (in category 'page
> controls') -----
>   fullControlSpecs
>
>         ^ {
>                 #spacer.
>                 #variableSpacer.
>                 {'-'.           #deletePage.
>  'Delete this page' translated}.
>                 #spacer.
> +               {'«'.           #firstPage.
> 'First page' translated}.
> -               {'«'.           #firstPage.
> 'First page' translated}.
>                 #spacer.
>                 {'<'.           #previousPage.                  'Previous
> page' translated}.
>                 #spacer.
> +               {'·'.           #invokeBookMenu.                'Click
> here to get a menu of options for this book.' translated}.
> -               {'·'.           #invokeBookMenu.                'Click
> here to get a menu of options for this book.' translated}.
>                 #spacer.
>                 {'>'.           #nextPage.
>  'Next page' translated}.
>                 #spacer.
> +               { '»'.          #lastPage.
>  'Final page' translated}.
> -               { '»'.          #lastPage.
>  'Final page' translated}.
>                 #spacer.
>                 {'+'.           #insertPage.
>  'Add a new page after this one' translated}.
>                 #variableSpacer.
> +               {'³'.           #fewerPageControls.     'Fewer controls'
> translated}
> -               {'³'.           #fewerPageControls.     'Fewer controls'
> translated}
>   }
>   !
>
> Item was changed:
>   ----- Method: BooklikeMorph>>shortControlSpecs (in category 'page
> controls') -----
>   shortControlSpecs
>   ^ {
>                 #spacer.
>                 #variableSpacer.
>                 {'<'.           #previousPage.                  'Previous
> page' translated}.
>                 #spacer.
> +               {'·'.           #invokeBookMenu.                'Click
> here to get a menu of options for this book.' translated}.
> -               {'·'.           #invokeBookMenu.                'Click
> here to get a menu of options for this book.' translated}.
>                 #spacer.
>                 {'>'.           #nextPage.
>  'Next page' translated}.
>                 #spacer.
>                 #variableSpacer.
> +               {'³'.           #showMoreControls.              'More
> controls' translated}
> -               {'³'.           #showMoreControls.              'More
> controls' translated}
>   }
>   !
>
> Item was changed:
>   SketchMorph subclass: #FatBitsPaint
>         instanceVariableNames: 'formToEdit magnification brush brushSize
> brushColor lastMouse currentTools currentSelectionMorph selectionAnchor
> backgroundColor'
>         classVariableNames: 'FormClipboard'
>         poolDictionaries: ''
>         category: 'MorphicExtras-AdditionalWidgets'!
>
>   !FatBitsPaint commentStamp: '<historical>' prior: 0!
>   Extensions to FatBitsPaint
>
>   With the goal of making FatBitsPaint a fairly nifty Form fixer-upper in
> the Squeak/morphic environment, I have started this set of extensions. It
> will probably be updated as the mood strikes, so keep an eye out for new
> versions.
>
>   First, some basic operating instructions:
>
>   Get a Form and send it the message #morphEdit. To get started, you can
> try:
>
>           (Form fromUser) morphEdit
>
>   And there is the form in all its glory. Control click on the form to get
> theFatBitsPaint menu and choose the "keep this menu up" item. This will be
> your main tool/command palette. With it you can:
> + ¥ Change the magnification
> + ¥ Change the brush size (in original scale pixels)
> + ¥ Change the brush color (via a ColorPickerMorph)
> - ¥ Change the magnification
> - ¥ Change the brush size (in original scale pixels)
> - ¥ Change the brush color (via a ColorPickerMorph)
>
>   Now to some of the enhancements:
>
>   (25 September 1999 2:38:25 pm )
>
> + ¥ ColorPickerMorphs now have a label below that indicates their use (you
> might have more than one open)
> + ¥ A quirk that could get the brush size out of alignment with the pixel
> size is fixed.
> + ¥ A background has been added so that you can see the full extent of the
> Form and so that you can observe the effect of translucent pixels in the
> form.
> + ¥ A menu item has been added to change the background color so that you
> can simulate the real environment the form will be displayed in.
> + ¥ The magnification and brush size menus now highlight their current
> value.
> + ¥ An inspect option has been added to the menu so that you can do
> arbitrary things to the form.
> + ¥ A file out option has been added to write the form to a file.
> - ¥ ColorPickerMorphs now have a label below that indicates their use (you
> might have more than one open)
> - ¥ A quirk that could get the brush size out of alignment with the pixel
> size is fixed.
> - ¥ A background has been added so that you can see the full extent of the
> Form and so that you can observe the effect of translucent pixels in the
> form.
> - ¥ A menu item has been added to change the background color so that you
> can simulate the real environment the form will be displayed in.
> - ¥ The magnification and brush size menus now highlight their current
> value.
> - ¥ An inspect option has been added to the menu so that you can do
> arbitrary things to the form.
> - ¥ A file out option has been added to write the form to a file.
>
>   (25 September 1999 10:02:13 pm )
>
> + ¥ New menu item: Tools allows you to choose between (for now) Paint
> Brush (all there was before) and Selections. Selections allows you to
> select rectangular regions of the form where the next menu takes over.
> + ¥ New menu item: Selections gives you choices:
> +         ¥ edit separately - opens a new editor on the selected
> rectangle. Useful for cropping.
> +         ¥ copy - copies the selection rectangle to a clipboard. Can be
> pasted to this or another FatBitsPaint.
> +         ¥ cut - does a copy and clears the selection to transparent.
> +         ¥ paste - paints the contents of the clipboard over the current
> selection. Only the starting point of the selection matters - the extent is
> controlled by the clipboard.
> - ¥ New menu item: Tools allows you to choose between (for now) Paint
> Brush (all there was before) and Selections. Selections allows you to
> select rectangular regions of the form where the next menu takes over.
> - ¥ New menu item: Selections gives you choices:
> -         ¥ edit separately - opens a new editor on the selected
> rectangle. Useful for cropping.
> -         ¥ copy - copies the selection rectangle to a clipboard. Can be
> pasted to this or another FatBitsPaint.
> -         ¥ cut - does a copy and clears the selection to transparent.
> -         ¥ paste - paints the contents of the clipboard over the current
> selection. Only the starting point of the selection matters - the extent is
> controlled by the clipboard.
>
>   !
>
> Item was changed:
>   ----- Method: GraphicalDictionaryMenu>>encodeToWorkspace (in category
> 'menu commands') -----
>   encodeToWorkspace
> +       | stream encodedStream pict text |
> +       pict := formChoices at: currentIndex.
> +       stream := ByteArray new writeStream.
> +       PNGReadWriter putForm: pict onStream: stream.
> +       encodedStream := stream contents base64Encoded.
> +       text := Workspace open model.
> +       text contents: 'Form fromBinaryStream: (Base64MimeConverter
> mimeDecodeToBytes: ''', encodedStream,''' readStream)'!
> - | stream encodedStream pict text |
> - pict := formChoices at: currentIndex.
> - stream := RWBinaryOrTextStream on: (String new).
> - PNGReadWriter putForm: pict onStream: stream.
> - encodedStream := stream contents asByteArray base64Encoded.
> - text := (Workspace open) model.
> - text contents: 'Form fromBinaryStream: (Base64MimeConverter
> mimeDecodeToBytes: ''', encodedStream,''' readStream)'!
>
> Item was changed:
>   ----- Method: PostscriptEncoder class>>macToPSCharacterChart (in
> category 'configuring') -----
>   macToPSCharacterChart
>         "mac char code, PS char code"
>         ^#(
> +               (128 999)  "Ä"
> +               (129 999)  "Å"
> +               (130 999)  "Ç"
> +               (131 999)  "É"
> +               (132 999)  "Ñ"
> +               (133 999)  "Ö"
> +               (134 999)  "Ü"
> +               (135 999)  "á"
> +               (136 999)  "à"
> +               (137 999)  "â"
> +               (138 999)  "ä"
> +               (139 999)  "ã"
> +               (140 999)  "å"
> +               (141 999)  "ç"
> +               (142 999)  "é"
> +               (143 999)  "è"
> +               (144 999)  "ê"
> +               (145 999)  "ë"
> +               (146 999)  "í"
> +               (147 999)  "ì"
> +               (148 999)  "î"
> +               (149 999)  "ï"
> +               (150 999)  "ñ"
> +               (151 999)  "ó"
> +               (152 999)  "ò"
> +               (153 999)  "ô"
> +               (154 999)  "ö"
> +               (155 999)  "õ"
> +               (156 999)  "ú"
> +               (157 999)  "ù"
> +               (158 999)  "û"
> +               (159 999)  "ü"
> +               (160 999)  "†"
> +               (161 202)  "°"
> +               (162 162)  "¢"
> +               (163 163)  "£"
> +               (164 167)  "§"
> +               (165 183)  "·"
> +               (166 182)  "¶"
> +               (167 251)  "ß"
> +               (168 999)  "®"
> +               (169 999)  "©"
> +               (170 999)  "™"
> +               (171 999)  "´"
> +               (172 999)  "¨"
> +               (173 999)  "€"
> +               (174 225)  "Æ"
> +               (175 999)  "Ø"
> +               (176 999)  " "
> +               (177 999)  "±"
> +               (178 999)  "Š"
> +               (179 999)  " "
> +               (180 165)  "¥"
> +               (181 999)  "µ"
> +               (182 999)  "Ž"
> +               (183 999)  " "
> +               (184 999)  " "
> +               (185 999)  "š"
> +               (186 999)  " "
> +               (187 227)  "ª"
> +               (188 235)  "º"
> +               (189 999)  "ž"
> +               (190 241)  "æ"
> +               (191 999)  "ø"
> +               (192 191)  "¿"
> +               (193 166)  "¡"
> +               (194 999)  "¬"
> +               (195 999)  "¦"
> +               (196 999)  "ƒ"
> +               (197 999)  "­"
> +               (198 999)  "²"
> +               (199 171)  "«"
> +               (200 187)  "»"
> +               (201 188)  "…"
> +               (202 999)  " "
> +               (203 999)  "À"
> +               (204 999)  "Ã"
> +               (205 999)  "Õ"
> +               (206 234)  "Œ"
> +               (207 250)  "œ"
> +               (208 999)  "–"
> +               (209 999)  "—"
> +               (210 999)  "“"
> +               (211 999)  "”"
> +               (212 999)  "‘"
> +               (213 999)  "’"
> +               (214 999)  "÷"
> +               (215 999)  "³"
> +               (216 999)  "ÿ"
> +               (217 999)  "Ÿ"
> +               (218 999)  "¹"
> +               (219 999)  "¤"
> +               (220 999)  "‹"
> +               (221 999)  "›"
> +               (222 999)  "¼"
> +               (223 999)  "½"
> +               (224 999)  "‡"
> +               (225 999)  "·"
> +               (226 999)  "‚"
> +               (227 999)  "„"
> +               (228 999)  "‰"
> +               (229 999)  "Â"
> +               (230 999)  "Ê"
> +               (231 999)  "Á"
> +               (232 999)  "Ë"
> +               (233 999)  "È"
> +               (234 999)  "Í"
> +               (235 999)  "Î"
> +               (236 999)  "Ï"
> +               (237 999)  "Ì"
> +               (238 999)  "Ó"
> +               (239 999)  "Ô"
> +               (240 999)  "¾"
> +               (241 999)  "Ò"
> +               (242 999)  "Ú"
> +               (243 999)  "Û"
> +               (244 999)  "Ù"
> +               (245 999)  "Ð"
> +               (246 999)  "ˆ"
> +               (247 999)  "˜"
> +               (248 999)  "¯"
> +               (249 999)  "×"
> +               (250 999)  "Ý"
> +               (251 999)  "Þ"
> +               (252 999)  "¸"
> +               (253 999)  "ð"
> +               (254 999)  "ý"
> +               (255 999)  "þ"
> -               (128 999)  "Ä"
> -               (129 999)  "Å"
> -               (130 999)  "Ç"
> -               (131 999)  "É"
> -               (132 999)  "Ñ"
> -               (133 999)  "Ö"
> -               (134 999)  "Ü"
> -               (135 999)  "á"
> -               (136 999)  "à"
> -               (137 999)  "â"
> -               (138 999)  "ä"
> -               (139 999)  "ã"
> -               (140 999)  "å"
> -               (141 999)  "ç"
> -               (142 999)  "é"
> -               (143 999)  "è"
> -               (144 999)  "ê"
> -               (145 999)  "ë"
> -               (146 999)  "í"
> -               (147 999)  "ì"
> -               (148 999)  "î"
> -               (149 999)  "ï"
> -               (150 999)  "ñ"
> -               (151 999)  "ó"
> -               (152 999)  "ò"
> -               (153 999)  "ô"
> -               (154 999)  "ö"
> -               (155 999)  "õ"
> -               (156 999)  "ú"
> -               (157 999)  "ù"
> -               (158 999)  "û"
> -               (159 999)  "ü"
> -               (160 999)  "†"
> -               (161 202)  "°"
> -               (162 162)  "¢"
> -               (163 163)  "£"
> -               (164 167)  "§"
> -               (165 183)  "·"
> -               (166 182)  "¶"
> -               (167 251)  "ß"
> -               (168 999)  "®"
> -               (169 999)  "©"
> -               (170 999)  "™"
> -               (171 999)  "´"
> -               (172 999)  "¨"
> -               (173 999)  "€"
> -               (174 225)  "Æ"
> -               (175 999)  "Ø"
> -               (176 999)  " "
> -               (177 999)  "±"
> -               (178 999)  "Š"
> -               (179 999)  " "
> -               (180 165)  "¥"
> -               (181 999)  "µ"
> -               (182 999)  "Ž"
> -               (183 999)  " "
> -               (184 999)  " "
> -               (185 999)  "š"
> -               (186 999)  " "
> -               (187 227)  "ª"
> -               (188 235)  "º"
> -               (189 999)  "ž"
> -               (190 241)  "æ"
> -               (191 999)  "ø"
> -               (192 191)  "¿"
> -               (193 166)  "¡"
> -               (194 999)  "¬"
> -               (195 999)  "¦"
> -               (196 999)  "ƒ"
> -               (197 999)  "­"
> -               (198 999)  "²"
> -               (199 171)  "«"
> -               (200 187)  "»"
> -               (201 188)  "…"
> -               (202 999)  " "
> -               (203 999)  "À"
> -               (204 999)  "Ã"
> -               (205 999)  "Õ"
> -               (206 234)  "Œ"
> -               (207 250)  "œ"
> -               (208 999)  "–"
> -               (209 999)  "—"
> -               (210 999)  "“"
> -               (211 999)  "”"
> -               (212 999)  "‘"
> -               (213 999)  "’"
> -               (214 999)  "÷"
> -               (215 999)  "³"
> -               (216 999)  "ÿ"
> -               (217 999)  "Ÿ"
> -               (218 999)  "¹"
> -               (219 999)  "¤"
> -               (220 999)  "‹"
> -               (221 999)  "›"
> -               (222 999)  "¼"
> -               (223 999)  "½"
> -               (224 999)  "‡"
> -               (225 999)  "·"
> -               (226 999)  "‚"
> -               (227 999)  "„"
> -               (228 999)  "‰"
> -               (229 999)  "Â"
> -               (230 999)  "Ê"
> -               (231 999)  "Á"
> -               (232 999)  "Ë"
> -               (233 999)  "È"
> -               (234 999)  "Í"
> -               (235 999)  "Î"
> -               (236 999)  "Ï"
> -               (237 999)  "Ì"
> -               (238 999)  "Ó"
> -               (239 999)  "Ô"
> -               (240 999)  "¾"
> -               (241 999)  "Ò"
> -               (242 999)  "Ú"
> -               (243 999)  "Û"
> -               (244 999)  "Ù"
> -               (245 999)  "Ð"
> -               (246 999)  "ˆ"
> -               (247 999)  "˜"
> -               (248 999)  "¯"
> -               (249 999)  "×"
> -               (250 999)  "Ý"
> -               (251 999)  "Þ"
> -               (252 999)  "¸"
> -               (253 999)  "ð"
> -               (254 999)  "ý"
> -               (255 999)  "þ"
>         )!
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.squeakfoundation.org/pipermail/squeak-dev/attachments/20140720/2dfb9432/attachment-0001.htm


More information about the Squeak-dev mailing list