Group menu block only shown on og nodes or views very hacky

//***********************
// paste this in block body
//***********************
 
<?php
// get the current group nid if we can
$group_node = og_set_group_context();
$gid02 = $group_node->nid;
$gid = (int)$gid02;
if ($gid02 === null) { // bork: couldn't get the group nid, see Og Tracker patch for possible solution?? http://drupal.org/node/66145
  // HACK: get the internal (source) url from the first part of the path with arg, expecting to find 'group/group-name'
  $group_url = drupal_lookup_path('source', arg(0).'/'.arg(1));
  // extract the group node id, load the node and get the title
  $group_url_exploded = explode('/', $group_url);
  $gid = $group_url_exploded[1];
  $group_node = node_load($gid);
}
 
$group_title = $group_node->title;
 
 
$group_path = drupal_get_path_alias('node/'.$gid);
 
// assumes this block is built on a node that's in a group
 
// build the links
$items[] = l(t('Forum'), 'forums/'.substr($group_path, 6).'/group-discussion');
$items[] = l(t('Events'), $group_path.'/events');
$items[] = l(t('Photos'), $group_path.'/photos');
$items[] = l(t('Links'), $group_path.'/links');
$items[] = l(t('Resources'), $group_path.'/resources');
 
print '<h2 class = "title">'.$group_title.'</h2>';
 
// We theme our array of links as an unordered list.
print theme('item_list', $items);
?>
 
 
//***********************
// paste this in block visibility php
//***********************
 
<?php 
$match = FALSE;
 
// get the current group nid
$group_node = og_set_group_context();
$gid02 = $group_node->nid;
$gid = (int)$gid02;
if ($gid02 === null) $gid = 0;
 
// are we on a group page?
// HACK: second param to also show this on group views generated pages
// TODO: fix this crapness: (substr($_SERVER["REQUEST_URI"], 0, 7) == '/group/')
 
if (($gid != 0) || (substr($_SERVER["REQUEST_URI"], 0, 7) == '/group/')) { 
    global $user;
    // is the user a member of this group?
    if ($user->og_groups[$gid]['nid'] == $gid) {  
      $match = TRUE;
    }
}
 
return $match;
?>