Konversation/Scripts/Import mIRC server list/da: Difference between revisions
Importing a new version from external source |
Updating to match new version of source page |
||
| Line 109: | Line 109: | ||
BEGIN { | BEGIN { | ||
my $konvs = `ps ax | grep konversation | grep -v grep`; | my $konvs = `ps ax | grep konversation | grep -v grep`; | ||
if ($konvs =~ /konversation/){ | if ($konvs =~ /konversation/){ | ||
| Line 116: | Line 115: | ||
} | } | ||
my @mod_list = ('Config::Tiny', 'File::Copy', 'LWP::Simple'); | my @mod_list = ('Config::Tiny', 'File::Copy', 'LWP::Simple'); | ||
# If there isn't a konversationrc in the ARGV, add File::HomeDir | # If there isn't a konversationrc in the ARGV, add File::HomeDir | ||
push(@mod_list, 'File::HomeDir') | push(@mod_list, 'File::HomeDir') | ||
| Line 125: | Line 122: | ||
|| ($ENV{KDEHOME} && -r "$ENV{KDEHOME}/share/config/konversationrc"); | || ($ENV{KDEHOME} && -r "$ENV{KDEHOME}/share/config/konversationrc"); | ||
foreach my $mod (@mod_list){ | foreach my $mod (@mod_list){ | ||
eval { | eval { | ||
| Line 183: | Line 179: | ||
print "Counting existing server groups\n"; | print "Counting existing server groups\n"; | ||
my $gcount = 0; | my $gcount = 0; | ||
Latest revision as of 17:43, 23 February 2013
Information =
Dette script læser mIRC's serverliste fra mirc.com og importerer den til din serverliste i Konversation.
- Det vil IKKE overskrive dine eksisterende servere, men vil føje listen til din eksisterende liste.
- Det integrere ikke: Hvis du allerede har en freenode gruppe, så vil du have to freenode grupper efter at have kørt scriptet.
- Det sætter alle NYE servere til at bruge din standardprofil.
- Det antager, at du ønsker at forbinde til den første port, som er oplistet i mIRC-config'en. (Konversation synes ikke at understøtte flere porte).
Brug
Kopiér scriptet herunder til et nyt tekstdokument og det som 'konversation_servers' (eller hvad du nu synes er passende; husk blot at ændre tilsvarende i det følgende!)
Sørg for at afslutte Konversation (det er ikke nok blot at lukke programmet), og kør så:
perl konversation_servers
or
perl konversation_servers /path/to/konversationrc
For at køre det, skal du have nogle perlmoduler installeret:
Du ksn undvære File::HomeDir, hvis du medtager stien til konversationrc i kommandolinjekaldet eller hvis miljøvariablen KDEHOME er sat og konversationrc er, hvor den skal være.
Garanti
DETTE SCRIPT LEVERES MED ABSOLUT INGEN GARANTIER.
Hjælp
Har du spørgsmål, så find Woosta på Freenode eller spørg din lokale perlguru.
Licens
(c)2007 Rick Measham. Dette program er fri software; du kan videredistribuere det og/eller modificere der under samme betingelser som for Perl selv.
Scriptet
'"`UNIQ--syntaxhighlight-00000002-QINU`"'