I don't see why this was added to the "help" menu ... This is not about help
at all; it's a set-up assistant. A link should be given to it in the
preferences window... right ?
Karel.
2007/5/6, [EMAIL PROTECTED] <
[EMAIL PROTECTED]>:
Revision: 8550
http://svn.sourceforge.net/amsn/?rev=8550&view=rev
Author: tomhennigan
Date: 2007-05-06 06:13:47 -0700 (Sun, 06 May 2007)
Log Message:
-----------
Added a binding to close the pluginslog with modifier-w.
Added a "Configure Audio & Video Settings" option to the help menu. (NB.
new lang key configureaudiovideo).
I also made some of the key bindings in gui.tcl a bit more platform
agnostic (using the GetPlatformModifier command).
Modified Paths:
--------------
trunk/amsn/gui.tcl
trunk/amsn/lang/langen
trunk/amsn/pluginslog.tcl
Modified: trunk/amsn/gui.tcl
===================================================================
--- trunk/amsn/gui.tcl 2007-05-06 12:46:49 UTC (rev 8549)
+++ trunk/amsn/gui.tcl 2007-05-06 13:13:47 UTC (rev 8550)
@@ -3472,6 +3472,9 @@
$help add command -label "[trans onlinehelp]" \
-command "launch_browser $::weburl/wiki/Main_Page"
\
}
+
+ $help add command -label "[trans configureaudiovideo]" \
+ -command [list ::AVAssistant::AVAssistant]
set lang [::config::getGlobalKey language]
$help add command -label "[trans faq]" \
@@ -3565,58 +3568,46 @@
#delete F10 binding that crashes amsn
bind all <F10> ""
-
- #Set key bindings. They are different on Mac. (e.g. Command key
instead of Control)
+
+ set modifier [GetPlatformModifier]
+ #Status log
+ bind . <$modifier-s> toggle_status
+ #Console
+ bind . <$modifier-c> "load_console; console show"
+ #Quit
+ bind all <$modifier-q> "exit"
+ bind all <$modifier-Q> "exit"
+
+ #Set key bindings which are different on Mac.
if { [OnMac] } {
- #Status log
- bind . <Command-s> toggle_status
- # Command-Shift-s is now used by the skin menuitem in
appmenu.
- #bind . <Command-S> toggle_status
- #Console
- bind . <Command-c> "load_console; console show"
- bind . <Command-C> "load_console; console show"
#Skin selector
- bind . <Command-S> ::skinsGUI::SelectSkin
+ bind . <$modifier-S> ::skinsGUI::SelectSkin
#Plugin selector
- bind . <Command-P> ::plugins::PluginGui
+ bind . <$modifier-P> ::plugins::PluginGui
#Preferences
- bind . <Command-,> Preferences
+ bind . <$modifier-,> Preferences
#BossMode (Command Alt space is used as a global key combo
since Mac OS X 10.4.)
- bind . <Command-Shift-space> BossMode
+ bind . <$modifier-Shift-space> BossMode
#Plugins log
- bind . <Option-p> ::pluginslog::toggle
- bind . <Option-P> ::pluginslog::toggle
- #Quit
- bind all <Command-q> "exit"
- bind all <Command-Q> "exit"
- #Raise cl window
- #tomhennigan: This is now used by CreateStatesMenu.
Windows can be cycled using Command-asciitilde & Command-quoteleft.
- #bind all <Command-Key-1> "raise ."
+ bind . <$modifier-p> ::pluginslog::toggle
+
#Online Help
- bind all <Command-/> "launch_browser
$::weburl/wiki/Main_Page"
- bind all <Command-?> "launch_browser
$::weburl/wiki/Main_Page"
+ bind all <$modifier-/> "launch_browser
$::weburl/wiki/Main_Page"
+ bind all <$modifier-?> "launch_browser
$::weburl/wiki/Main_Page"
- bind all <Command-m> "catch {wm state %W normal;
carbon::processHICommand mini %W}"
- bind all <Command-M> "catch {wm state %W normal;
carbon::processHICommand mini %W}"
- bind all <Command-quoteleft> "catch
{carbon::processHICommand rotw %W}"
- bind all <Command-asciitilde> "catch
{carbon::processHICommand rotb %W}"
+ bind all <$modifier-m> "catch {wm state %W normal;
carbon::processHICommand mini %W}"
+ bind all <$modifier-M> "catch {wm state %W normal;
carbon::processHICommand mini %W}"
+ bind all <$modifier-quoteleft> "catch
{carbon::processHICommand rotw %W}"
+ bind all <$modifier-asciitilde> "catch
{carbon::processHICommand rotb %W}"
# Webcam bindings
} else {
- #Status log
- bind . <Control-s> toggle_status
- #Console
- bind . <Control-c> "load_console; console show"
#Plugins log
bind . <Alt-p> ::pluginslog::toggle
- #Preferences
- bind . <Control-p> Preferences
- #Quit
- bind . <Control-q> exit
#Boss mode
- bind . <Control-Alt-space> BossMode
+ bind . <$modifier-Alt-space> BossMode
# Show/hide menu binding with toggle == 1
- bind . <Control-m> "Showhidemenu 1"
- bind . <Control-n> "::AVAssistant::AVAssistant"
+ bind . <$modifier-m> "Showhidemenu 1"
+ bind . <$modifier-n> "::AVAssistant::AVAssistant"
}
#Set the wm close button action
Modified: trunk/amsn/lang/langen
===================================================================
--- trunk/amsn/lang/langen 2007-05-06 12:46:49 UTC (rev 8549)
+++ trunk/amsn/lang/langen 2007-05-06 13:13:47 UTC (rev 8550)
@@ -194,6 +194,7 @@
configure Configure
configuremic Configuring your microphone
configuringaudio Configuring audio settings
+configureaudiovideo Configure Audio and Video Settings
confirm Are you sure?
confirmbl Are you sure you want to block this contact?
confirmdelete Are you sure you want to delete $1?
Modified: trunk/amsn/pluginslog.tcl
===================================================================
--- trunk/amsn/pluginslog.tcl 2007-05-06 12:46:49 UTC (rev 8549)
+++ trunk/amsn/pluginslog.tcl 2007-05-06 13:13:47 UTC (rev 8550)
@@ -165,6 +165,8 @@
$window.info tag configure blue -foreground blue
$window.info tag configure error -foreground white -background
black
+ set modifier [GetPlatformModifier]
+ bind $window <$modifier-w> ::pluginslog::toggle
wm protocol $window WM_DELETE_WINDOW { ::pluginslog::toggle }
}
This was sent by the SourceForge.net collaborative development platform,
the world's largest Open Source development site.
-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Amsn-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/amsn-commits
-------------------------------------------------------------------------
This SF.net email is sponsored by DB2 Express
Download DB2 Express C - the FREE version of DB2 express and take
control of your XML. No limits. Just data. Click to get it now.
http://sourceforge.net/powerbar/db2/
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel
