← Back to branch summary

~amsn-daily/amsn/amsn-packaging

« back to all changes in this revision

Viewing changes to preferences.tcl

  • Committer: kakaroto
  • Date: 2008-05-15 00:06:32 UTC
  • Revision ID: svn-v4:f248a3e1-9e13-0410-b2cf-a4429de6d898:trunk/amsn:9886
Add support for content roaming (nickname+psm.. not dp.. for now)

Show diffs side-by-side

added added

removed removed

Lines of Context:
preferences.tcl
236
236
 
237
237
        proc StoreNick { nick } {
238
238
                if {$nick != "" && $nick != [::abook::getPersonal MFN] && [::MSN::myStatusIs] != "FLN"} {
239
 
                        ::MSN::changeName [::config::getKey login] $nick
 
239
                        ::MSN::changeName $nick
240
240
                }
241
241
        }
242
242
 
3297
3297
        set lfname "$lfname.lfname.1"
3298
3298
        set new_name [$lfname.name.entry get]
3299
3299
        if {$new_name != "" && $new_name != [::abook::getPersonal MFN] && [::MSN::myStatusIs] != "FLN"} {
3300
 
                ::MSN::changeName [::config::getKey login] $new_name
 
3300
                ::MSN::changeName $new_name
3301
3301
        }
3302
3302
        ::config::setKey p4c_name [$lfname.p4c.entry get]
3303
3303