function get_pagename_aliases()
 {
     $_aliases = array();
     foreach (PukiWikiFunc::get_source(':config/aliases') as $_line) {
         if (preg_match("/\\[(.+?) (.+?)\\](.*)/", $_line, $_match) && PukiWikiFunc::is_page($_match[2])) {
             $_aliases[$_match[1]] = $_match[2];
             if ($_match[3]) {
                 $_aliases[$_match[1]] .= '!' . $_match[3];
             }
         }
     }
     return $_aliases;
 }