The Inbox: Morphic-klub.402.mcz

A new version of Morphic was added to project The Inbox:
http://source.squeak.org/inbox/Morphic-klub.402.mcz

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

Name: Morphic-klub.402
Author: klub
Time: 28 March 2010, 5:41:43.643 pm
UUID: 203ce036-013c-4586-8404-ba6e976902e5
Ancestors: Morphic-cmm.401

- added a search bar and a clock to the docking bar

=============== Diff against Morphic-cmm.401 ===============

Item was added:
+ ----- Method: SearchBarMorph>>initialize (in category 'as yet unclassified') -----
+ initialize
+
+ super initialize.
+ text := Text new.
+ backgroundColor := TranslucentColor gray alpha: 0.3.
+ self width: 200
+ !

Item was added:
+ TextMorph subclass: #SearchBarMorph
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'Morphic-Menus-DockingBar'!

Item was added:
+ ----- Method: SearchBarMorph>>fillStyle (in category 'as yet unclassified') -----
+ fillStyle
+
+ ^backgroundColor!

Item was added:
+ ----- Method: TheWorldMainDockingBar>>clockOn: (in category 'right side') -----
+ clockOn: aDockingBar
+
+ aDockingBar
+ addMorphBack: (
+ ClockMorph new
+ showSeconds: false;
+ yourself);
+ addDefaultSpace!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>helpMenuOn: (in category 'construction') -----
  helpMenuOn: aDockingBar
 
  aDockingBar addItem: [ :it |
  it contents: 'Help' translated;
  addSubMenu: [ :menu |  'Todo'.
  menu addItem:[:item|
  item
  contents: 'Online Resources' translated;
  help: 'Online resources for Squeak' translated;
  target: self;
+ icon: MenuIcons smallHelpIcon;
  selector: #showSqueakResources ].
  menu addItem:[:item|
  item
  contents: 'Keyboard Shortcuts' translated;
  help: 'Keyboard bindings used in Squeak' translated;
  target: Utilities;
  selector: #openCommandKeyHelp ].
  menu addItem:[:item|
  item
  contents: 'Font Size Summary' translated;
  help: 'Font size summary from the old Squeak 3.10.2 help menu.' translated;
  target: TextStyle;
  selector: #fontSizeSummary ].
  menu addItem:[:item|
  item
  contents: 'Useful Expressions' translated;
  help: 'Useful expressions from the old Squeak 3.10.2 help menu.' translated;
  target: Utilities;
  selector: #openStandardWorkspace ].
  ]].!

Item was added:
+ ----- Method: TheWorldMainDockingBar>>searchBarOn: (in category 'right side') -----
+ searchBarOn: aDockingBar
+
+ aDockingBar
+ addMorphBack: SearchBarMorph new;
+ addDefaultSpace!

Item was changed:
  ----- Method: TheWorldMainDockingBar>>menusOn: (in category 'construction') -----
  menusOn: aDockingBar
 
  self
  squeakMenuOn: aDockingBar;
  projectsMenuOn: aDockingBar;
  toolsMenuOn: aDockingBar;
  extrasMenuOn: aDockingBar;
  windowsMenuOn: aDockingBar;
+ helpMenuOn: aDockingBar.
+ aDockingBar addSpacer.
+ self
+ searchBarOn: aDockingBar;
+ clockOn: aDockingBar!
- helpMenuOn: aDockingBar!