/*****************************************************************************
* applescript.m: MacOS X AppleScript support
*****************************************************************************
- * Copyright (C) 2002-2003 VideoLAN (Centrale Réseaux) and its contributors
+ * Copyright (C) 2002-2003 the VideoLAN team
* $Id$
*
* Authors: Derk-Jan Hartman <thedj@users.sourceforge.net>
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
*****************************************************************************/
/*****************************************************************************
#include "controls.h"
#include "open.h"
-
/*****************************************************************************
* VLGetURLScriptCommand implementation
*****************************************************************************/
if ( o_urlString )
{
NSURL * o_url;
-
- playlist_Add( p_playlist, [o_urlString fileSystemRepresentation],
- [[[NSFileManager defaultManager] displayNameAtPath: o_urlString] UTF8String],
- PLAYLIST_INSERT, PLAYLIST_END );
+ input_item_t *p_input;
+
+ p_input = input_ItemNew( p_playlist,
+ [o_urlString fileSystemRepresentation],
+ [[[NSFileManager defaultManager]
+ displayNameAtPath: o_urlString] UTF8String] );
+ playlist_AddInput( p_playlist, p_input, PLAYLIST_INSERT,
+ PLAYLIST_END, VLC_TRUE, VLC_FALSE );
+
o_url = [NSURL fileURLWithPath: o_urlString];
if( o_url != nil )
- {
+ {
[[NSDocumentController sharedDocumentController]
- noteNewRecentDocumentURL: o_url];
+ noteNewRecentDocumentURL: o_url];
}
}
vlc_object_release( p_playlist );
}
else if ( [o_command isEqualToString:@"fullscreen"] )
{
- NSMenuItem *o_mi = [[NSMenuItem alloc] initWithTitle: _NS("Fullscreen") action: nil keyEquivalent:@""];
- [o_controls windowAction:[o_mi autorelease]];
+ [o_controls toogleFullscreen: self];
return nil;
}
else if ( [o_command isEqualToString:@"mute"] )
}
@end
+
+/*****************************************************************************
+ * Category that adds AppleScript support to NSApplication
+ *****************************************************************************/
+@implementation NSApplication(ScriptSupport)
+
+- (BOOL) scriptFullscreenMode {
+ VLCControls * o_controls = (VLCControls *)[[self delegate] getControls];
+
+ return [o_controls isFullscreen];
+}
+- (void) setScriptFullscreenMode: (BOOL) mode {
+ VLCControls * o_controls = (VLCControls *)[[self delegate] getControls];
+ if (mode == [o_controls isFullscreen]) return;
+ [o_controls toogleFullscreen: self];
+}
+
+@end