--- deliantra/Deliantra-Client/DC.pm	2007/12/26 20:46:39	1.168
+++ deliantra/Deliantra-Client/DC.pm	2007/12/26 21:03:21	1.169
@@ -1,10 +1,10 @@
 =head1 NAME
 
-dc - undocumented utility garbage for our deliantra client
+DC - undocumented utility garbage for our deliantra client
 
 =head1 SYNOPSIS
 
- use dc;
+ use DC;
 
 =head1 DESCRIPTION
 
@@ -12,7 +12,7 @@
 
 =cut
 
-package dc;
+package DC;
 
 use Carp ();
 
@@ -39,10 +39,10 @@
 =cut
 
 sub guard(&) {
-   bless \(my $cb = $_[0]), "dc::Guard"
+   bless \(my $cb = $_[0]), "DC::Guard"
 }
 
-sub dc::Guard::DESTROY {
+sub DC::Guard::DESTROY {
    ${$_[0]}->()
 }
 
@@ -76,7 +76,7 @@
 sub background(&;&) {
    my ($bg, $cb) = @_;
 
-   my ($fh_r, $fh_w) = dc::socketpipe;
+   my ($fh_r, $fh_w) = DC::socketpipe;
 
    my $pid = fork;
 
@@ -96,13 +96,13 @@
          my $msg = $@;
          $msg =~ s/\n+/\n/;
          warn "FATAL: $msg";
-         dc::_exit 1;
+         DC::_exit 1;
       }
 
       # win32 is fucked up, of course. exit will clean stuff up,
       # which destroys our database etc. _exit will exit ALL
       # forked processes, because of the dreaded fork emulation.
-      dc::_exit 0;
+      DC::_exit 0;
    }
 
    close $fh_w;
@@ -124,7 +124,7 @@
             $cb->(JSON::XS->new->allow_nonref->decode ($1));
          } else {
             ::message ({
-               markup => "background($pid): " . dc::asxml $line,
+               markup => "background($pid): " . DC::asxml $line,
             });
          }
       }
@@ -140,7 +140,7 @@
    print $msg, "\n";
 }
 
-package dc;
+package DC;
 
 sub find_rcfile($) {
    my $path;
@@ -197,7 +197,7 @@
 sub lwp_useragent {
    require LWP::UserAgent;
    
-   dc::set_proxy;
+   DC::set_proxy;
 
    my $ua = LWP::UserAgent->new (
       agent      => "cfplus $VERSION",
@@ -228,13 +228,13 @@
 
 }
 
-package dc::Layout;
+package DC::Layout;
 
-$dc::OpenGL::INIT_HOOK{"dc::Layout"} = sub {
+$DC::OpenGL::INIT_HOOK{"DC::Layout"} = sub {
    glyph_cache_restore;
 };
 
-$dc::OpenGL::SHUTDOWN_HOOK{"dc::Layout"} = sub {
+$DC::OpenGL::SHUTDOWN_HOOK{"DC::Layout"} = sub {
    glyph_cache_backup;
 };