SwitchIdentity stub
authormichael <michael>
Mon, 22 May 2006 11:50:33 +0000 (11:50 +0000)
committermichael <michael>
Mon, 22 May 2006 11:50:33 +0000 (11:50 +0000)
snom.pl

diff --git a/snom.pl b/snom.pl
index 673dffa..45137b6 100755 (executable)
--- a/snom.pl
+++ b/snom.pl
@@ -1,5 +1,5 @@
 #!/bin/sh
 #!/bin/sh
-#$Id: snom.pl,v 1.29 2006-05-22 11:47:37 michael Exp $
+#$Id: snom.pl,v 1.30 2006-05-22 11:50:33 michael Exp $
 
 # http://developer.gnome.org/doc/API/2.2/gtk/gtk-migrating-GtkComboBox.html
 
 
 # http://developer.gnome.org/doc/API/2.2/gtk/gtk-migrating-GtkComboBox.html
 
@@ -57,6 +57,7 @@ $g_host->set_active(0);
 UpdatePhoneInfo();
 $g_host->signal_connect(changed => \&UpdatePhoneInfo);
 $g_host->show();
 UpdatePhoneInfo();
 $g_host->signal_connect(changed => \&UpdatePhoneInfo);
 $g_host->show();
+$g_host->signal_connect(changed => \&SwitchIdentity);
 $g_identity->show();
 
 set_locale Gtk2;
 $g_identity->show();
 
 set_locale Gtk2;
@@ -356,6 +357,11 @@ sub UpdatePhoneInfo
        $g_identity->set_active(0);
 }
 
        $g_identity->set_active(0);
 }
 
+sub SwitchIdentity
+{
+       print "TODO: Switch Identity on <".${$Config{$sections[$g_host->get_active]}}{host}."> to ".$g_identity->get_active."!\n";
+}
+
 sub CloseAppWindow
 {
        $window->destroy;
 sub CloseAppWindow
 {
        $window->destroy;
Impressum, Datenschutz