pdb/stddefs.pdb

   1 # GIMP - The GNU Image Manipulation Program
   2 # Copyright (C) 1998-2003 Manish Singh <yosh@gimp.org>
   3
   4 # This program is free software: you can redistribute it and/or modify
   5 # it under the terms of the GNU General Public License as published by
   6 # the Free Software Foundation; either version 3 of the License, or
   7 # (at your option) any later version.
   8
   9 # This program is distributed in the hope that it will be useful,
  10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # GNU General Public License for more details.
  13
  14 # You should have received a copy of the GNU General Public License
  15 # along with this program.  If not, see <https://www.gnu.org/licenses/>.
  16
  17 # Boilerplate PDB stuff
  18
  19 sub std_pdb_misc {
  20     $author = $copyright = 'Spencer Kimball & Peter Mattis';
  21     $date   = '1995-1996';
  22 }
  23
  24 sub contrib_pdb_misc {
  25     my $a = shift;
  26     my $e = shift;
  27     my $d = shift;
  28     my $s = shift;
  29
  30     if ($e eq '') {
  31         $author = "$a";
  32     } else {
  33         $author = "$a <$e>";
  34     }
  35
  36     $copyright = "$a";
  37     $date = "$d";
  38
  39     if ($s) {
  40         $since = "$s";
  41     }
  42 }
  43
  44 sub adam_pdb_misc {
  45     contrib_pdb_misc('Adam D. Moss', '', @_);
  46 }
  47
  48 sub adrian_pdb_misc {
  49     contrib_pdb_misc('Adrian Likins', 'adrian@gimp.org', @_);
  50 }
  51
  52 sub adeath_pdb_misc {
  53     contrib_pdb_misc('Alexia Death', '', @_);
  54 }
  55
  56 sub andy_pdb_misc {
  57     contrib_pdb_misc('Andy Thomas', '', @_);
  58 }
  59
  60 sub austin_pdb_misc {
  61     contrib_pdb_misc('Austin Donnelly', '', @_);
  62 }
  63
  64 sub barak_pdb_misc {
  65     contrib_pdb_misc('Barak Itkin', 'lightningismyname@gmail.com', @_);
  66 }
  67
  68 sub bill_pdb_misc {
  69     contrib_pdb_misc('Bill Skaggs', 'weskaggs@primate.ucdavis.edu', @_);
  70 }
  71
  72 sub david_pdb_misc {
  73     contrib_pdb_misc('David Gowers', '', @_);
  74 }
  75
  76 sub ejs_pdb_misc {
  77     contrib_pdb_misc('Ed Swartz', '', @_);
  78 }
  79
  80 sub ell_pdb_misc {
  81     contrib_pdb_misc('Ell', '', @_);
  82 }
  83
  84 sub federico_pdb_misc {
  85     contrib_pdb_misc('Federico Mena Quintero', '', @_);
  86 }
  87
  88 sub jay_pdb_misc {
  89     contrib_pdb_misc('Jay Cox', '', @_);
  90 }
  91
  92 sub jehan_pdb_misc {
  93     contrib_pdb_misc('Jehan', '', @_);
  94 }
  95
  96 sub joao_pdb_misc {
  97     contrib_pdb_misc('Jo\xc3\xa3o S. O. Bueno', '', @_);
  98 }
  99
 100 sub josh_pdb_misc {
 101     contrib_pdb_misc('Josh MacDonald', '', @_);
 102 }
 103
 104 sub kevins_pdb_misc {
 105     contrib_pdb_misc('Kevin Sookocheff', '', @_);
 106 }
 107
 108 sub larry_pdb_misc {
 109     contrib_pdb_misc('Larry Ewing', '', @_);
 110 }
 111
 112 sub marc_pdb_misc {
 113     contrib_pdb_misc('Marc Lehmann', '', @_);
 114 }
 115
 116 sub marcus_pdb_misc {
 117     contrib_pdb_misc('Marcus Heese', 'heese@cip.ifi.lmu.de', @_);
 118 }
 119
 120 sub martin_pdb_misc {
 121     contrib_pdb_misc('Martin Nordholts', '', @_);
 122 }
 123
 124 sub mitch_pdb_misc {
 125     contrib_pdb_misc('Michael Natterer', 'mitch@gimp.org', @_);
 126 }
 127
 128 sub neo_pdb_misc {
 129     contrib_pdb_misc('Sven Neumann', 'sven@gimp.org', @_);
 130 }
 131
 132 sub nick_pdb_misc {
 133     contrib_pdb_misc('Nick Lamb', '', @_);
 134 }
 135
 136 sub raphael_pdb_misc {
 137     contrib_pdb_misc('Rapha\xc3\xabl Quinet', 'raphael@gimp.org', @_);
 138 }
 139
 140 sub rock_pdb_misc {
 141     contrib_pdb_misc('Nathan Summers', 'rock@gimp.org', @_);
 142 }
 143
 144 sub seth_pdb_misc {
 145     contrib_pdb_misc('Seth Burgess', '', @_);
 146 }
 147
 148 sub shlomi_pdb_misc {
 149     contrib_pdb_misc('Shlomi Fish', 'shlomif@iglu.org.il', @_);
 150 }
 151
 152 sub simon_pdb_misc {
 153     contrib_pdb_misc('Simon Budig', '', @_);
 154 }
 155
 156 sub sylvain_pdb_misc {
 157     contrib_pdb_misc('Sylvain Foret', '', @_);
 158 }
 159
 160 sub wolfgang_pdb_misc {
 161     contrib_pdb_misc('Wolfgang Hofer', '', @_);
 162 }
 163
 164 sub yosh_pdb_misc {
 165     contrib_pdb_misc('Manish Singh', '', @_);
 166 }
 167
 168 sub std_pdb_deprecated {
 169     if (@_) {
 170         $blurb = $help = '';
 171         $deprecated = "@_";
 172     } else {
 173         $blurb = $help = '';
 174         $deprecated = "NONE";
 175     }
 176     $author = $copyright = $date = '';
 177 }
 178
 179 sub std_pdb_compat {
 180     $author = $copyright = "Compatibility procedure. Please see '@_' for credits.";
 181 }
 182
 183 sub std_pdb_debug {
 184     $help .= <<'HELP';
 185
 186
 187 This is a debug utility procedure. It is subject to change at any point,
 188 and should not be used in production.
 189 HELP
 190 }
 191
 192
 193 1;