# Copyright (c) 2001-2009 bivio Software, Inc. All rights reserved. # # Visit http://www.bivio.biz for more info. # # This library is free software; you can redistribute it and/or modify # it under the terms of the GNU Lesser General Public License as # published by the Free Software Foundation; either version 2.1 of the # License, or (at your option) any later version. # # This library is distributed in the hope that it will be useful, but # WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU # Lesser General Public License for more details. # # You should have received a copy of the GNU Lesser General Public # License along with this library; If not, you may get a copy from: # http://www.opensource.org/licenses/lgpl-license.html # # $Id: ViewShortcutsBase.pm,v 2.5 2009/12/14 03:26:22 nagler Exp $ package Bivio::UI::ViewShortcutsBase; use strict; use Bivio::Base 'Bivio::UNIVERSAL'; # C is subclassed by classes which implement view # helper methods called from L. # # The methods are available from views and # L. All methods defined here # must begin with C (view shortcut) and be static. This is enforced by this # module. # # You may specify the shortcuts by # L. our($VERSION) = sprintf('%d.%02d', q$Revision: 2.5 $ =~ /\d+/g); sub new { b_die( "you can't instantiate a ViewShortcut; perhaps you meant vs_new()?"); # DOES NOT RETURN } sub view_autoload { my(undef, $method, $args) = @_; b_die($method, ': invalid view function, widget, or shortcut.'); # DOES NOT RETURN } 1;