annotate Mac/BuildScript/seticon.m @ 64166:d0e9febfa00a 3.1

Merged revisions 84172 via svnmerge from svn+ssh://pythondev@svn.python.org/python/branches/py3k ........ r84172 | martin.v.loewis | 2010-08-18 18:12:23 +0200 (Mi, 18 Aug 2010) | 2 lines Restore GIL in nis_cat in case of error. ........
author Martin v. Löwis <martin@v.loewis.de>
date Thu, 19 Aug 2010 09:03:03 +0000
parents da7448ebce8b
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
52643
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
1 /*
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
2 * Simple tool for setting an icon on a file.
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
3 */
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
4 #import <Cocoa/Cocoa.h>
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
5 #include <stdio.h>
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
6
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
7 int main(int argc, char** argv)
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
8 {
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
9 if (argc != 3) {
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
10 fprintf(stderr, "Usage: seticon ICON TARGET");
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
11 return 1;
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
12 }
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
13
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
14 NSAutoreleasePool* pool = [[NSAutoreleasePool alloc] init];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
15 NSString* iconPath = [NSString stringWithUTF8String:argv[1]];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
16 NSString* filePath = [NSString stringWithUTF8String:argv[2]];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
17
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
18 [NSApplication sharedApplication];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
19
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
20 [[NSWorkspace sharedWorkspace]
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
21 setIcon: [[NSImage alloc] initWithContentsOfFile: iconPath]
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
22 forFile: filePath
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
23 options: 0];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
24 [pool release];
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
25 return 0;
da7448ebce8b Merge seticon.m file, for some reason 'svnmerge'
Ronald Oussoren <ronaldoussoren@mac.com>
parents:
diff changeset
26 }