mirror of
https://github.com/gnustep/apps-gorm.git
synced 2025-04-22 22:20:44 +00:00
Info panel update
git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/apps/gorm/trunk@5941 72102866-910b-0410-8b05-ffd578937521
This commit is contained in:
parent
423ad37201
commit
8d00bfa6f2
3 changed files with 23 additions and 6 deletions
|
@ -1,3 +1,8 @@
|
|||
Sun Feb 6 8:44:00 2000 Richard Frith-Macdonald <richard@brainstorm.co.uk>
|
||||
|
||||
Removed InfoPanel.m and updated Gorm to use standard panel now that
|
||||
NSApplication supports it.
|
||||
|
||||
Fri Feb 4 11:10:59 2000 Richard Frith-Macdonald <richard@brainstorm.co.uk>
|
||||
|
||||
* Palettes/0Menu/GormMenuInspectors.m: Added code for setting
|
||||
|
|
|
@ -77,7 +77,6 @@ Gorm_OBJC_FILES = \
|
|||
GormDocument.m \
|
||||
IBInspector.m \
|
||||
IBPalette.m \
|
||||
InfoPanel.m \
|
||||
GormViewKnobs.m \
|
||||
GormFilesOwner.m \
|
||||
GormObjectEditor.m \
|
||||
|
|
23
Gorm.m
23
Gorm.m
|
@ -528,11 +528,24 @@ NSAutoreleasePool *p = [NSAutoreleasePool new];
|
|||
|
||||
- (id) infoPanel: (id) sender
|
||||
{
|
||||
if (infoPanel == nil)
|
||||
{
|
||||
infoPanel = [InfoPanel new];
|
||||
}
|
||||
[infoPanel orderFront: nil];
|
||||
NSMutableDictionary *d;
|
||||
|
||||
d = [NSMutableDictionary dictionaryWithCapacity: 8];
|
||||
[d setObject: @"Gorm" forKey: @"ApplicationName"];
|
||||
[d setObject: @"GNUstep Graphicsl Object Relationship Modeller"
|
||||
forKey: @"ApplicationDescription"];
|
||||
[d setObject: @"Gorm 0.1" forKey: @"ApplicationRelease"];
|
||||
[d setObject: @"0.1 Feb 2000" forKey: @"FullVersionID"];
|
||||
[d setObject: [NSArray arrayWithObject:
|
||||
@"Richard Frith-Macdonald <richard@brainstorm.co.uk>"]
|
||||
forKey: @"Authors"];
|
||||
// [d setObject: @"See http://www.gnustep.org" forKey: @"URL"];
|
||||
[d setObject: @"Copyright (C) 1999, 2000 Free Software Foundation, Inc."
|
||||
forKey: @"Copyright"];
|
||||
[d setObject: @"Released under the GNU General Public License 2.0"
|
||||
forKey: @"CopyrightDescription"];
|
||||
|
||||
[self orderFrontStandardInfoPanelWithOptions: d];
|
||||
return self;
|
||||
}
|
||||
|
||||
|
|
Loading…
Reference in a new issue