Hi
I found the following bug:
- Contacts -> Add Group...
- Press cancel or escape
You'll get an error window.
That's because we are using $passport variable instead of $contact
Bye
Square87
Index: groups.tcl
===================================================================
--- groups.tcl (revisione 9161)
+++ groups.tcl (copia locale)
@@ -126,7 +126,7 @@
set pgc 0;
foreach contact [::abook::getAllContacts] {
if { [lsearch [::abook::getLists $contact] "FL"] != -1 } {
- set passport2 [string map { @ _40_ . _2E_ _ _5F_ } $passport]
+ set passport2 [string map { @ _40_ . _2E_ _ _5F_ } $contact]
::config::unsetKey tempcontact_$passport2
}
}
@@ -147,7 +147,7 @@
set pgc 0
foreach contact [::abook::getAllContacts] {
if { [lsearch [::abook::getLists $contact] "FL"] != -1 } {
- set passport2 [string map { @ _40_ . _2E_ _ _5F_ } $passport]
+ set passport2 [string map { @ _40_ . _2E_ _ _5F_ } $contact]
::config::unsetKey tempcontact_$passport2
}
}
-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2005.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
_______________________________________________
Amsn-devel mailing list
Amsn-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amsn-devel
