Hey, you say Bad Youness!! you even did a karma--
but I don't get the problem, apart from the --text "$.." becoming --text
$...
why wasn't it working ? vivia tried it and she said everything worked...
anyways, your modifs were to add the ::desktop_integration and remove the
'variable' things...
I don't know why you did that because all those procs are inside the
desktop_integration namespace already... (notice my mail where I explained
my modifs), because the ::tk_getSaveFile proc (for example) is :
proc tk_getSaveFile { args } {
return [eval ::desktop_intergation::KgetSaveFile $args]
}
anyways, tell me what went wrong..
also, don't forget something, I did all the modifs and did zero testing, I
can't even load the plugin since I have no kde and no gnome...
KaKaRoTo
------- Forwarded message -------
From: "Sander Hoentjen" <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED]
Subject: [Amsn-commits] amsn-extras/plugins/desktop_integration
desktop_integration.tcl,1.3,1.4
Date: Tue, 20 Dec 2005 10:57:11 -0500
Update of /cvsroot/amsn/amsn-extras/plugins/desktop_integration
In directory
sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23609/plugins/desktop_integration
Modified Files:
desktop_integration.tcl
Log Message:
remind: fix spelling errors (french = tranferts, but english = transfers..)
desktop integration: fix so dialog boxes work again (Bad Youness :P)
Index: desktop_integration.tcl
===================================================================
RCS file:
/cvsroot/amsn/amsn-extras/plugins/desktop_integration/desktop_integration.tcl,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** desktop_integration.tcl 19 Dec 2005 17:51:42 -0000 1.3
--- desktop_integration.tcl 20 Dec 2005 15:57:08 -0000 1.4
***************
*** 386,390 ****
if { $ktype == "msgbox" } { set ktype
"info" }
plugins_log $plugin_name "Calling \'zenity
--$ktype\'"
! catch {exec zenity --$ktype --text \"$message\" --title \"$title\"
&} answer
}
}
--- 386,390 ----
if { $ktype == "msgbox" } { set ktype
"info" }
plugins_log $plugin_name "Calling \'zenity
--$ktype\'"
! catch {exec zenity --$ktype --text $message
--title $title &} answer
}
}
***************
*** 425,429 ****
proc launch_dialog { execline } {
variable dlg_blocked
- variable answer
variable plugin_name
--- 425,428 ----
***************
*** 441,447 ****
fileevent $fileId readable "::desktop_integration::dialog_event
$fileId"
! tkwait variable answer
set dlg_blocked 0
! return $answer
}
--- 440,446 ----
fileevent $fileId readable "::desktop_integration::dialog_event
$fileId"
! tkwait variable ::desktop_integration::answer
set dlg_blocked 0
! return $::desktop_integration::answer
}
***************
*** 449,453 ****
proc launch_question { execline } {
variable dlg_blocked
- variable answer
variable plugin_name
--- 448,451 ----
***************
*** 466,484 ****
fileevent $fileId readable "::desktop_integration::question_event
$fileId"
! tkwait variable answer
set dlg_blocked 0
! return $answer
}
proc dialog_event { fileId } {
- variable answer
-
set temp ""
if { [gets $fileId line] < 0 } {
if [catch {close $fileId}] {
#If the user pressed Cancel we get here
! set answer ""
} else {
! set answer $temp
}
} else {
--- 464,481 ----
fileevent $fileId readable "::desktop_integration::question_event
$fileId"
! tkwait variable ::desktop_integration::answer
!
set dlg_blocked 0
! return $::desktop_integration::answer
}
proc dialog_event { fileId } {
set temp ""
if { [gets $fileId line] < 0 } {
if [catch {close $fileId}] {
#If the user pressed Cancel we get here
! set ::desktop_integration::answer ""
} else {
! set ::desktop_integration::answer $temp
}
} else {
***************
*** 488,497 ****
proc question_event { fileId } {
- variable answer
-
if [catch {close $fileId}] {
! set answer "no"
} else {
! set answer "yes"
}
}
--- 485,492 ----
proc question_event { fileId } {
if [catch {close $fileId}] {
! set ::desktop_integration::answer "no"
} else {
! set ::desktop_integration::answer "yes"
}
}
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log
files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://ads.osdn.com/?ad_id=7637&alloc_id=16865&op=click
_______________________________________________
Amsn-commits mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/amsn-commits
--
KaKaRoTo
-------------------------------------------------------
This SF.net email is sponsored by: Splunk Inc. Do you grep through log files
for problems? Stop! Download the new AJAX search engine that makes
searching your log files as easy as surfing the web. DOWNLOAD SPLUNK!
http://ads.osdn.com/?ad_id=7637&alloc_id=16865&op=click
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel
