source:
t/mock.pl
@
35b6eb9
| Last change on this file since 35b6eb9 was 5aa33fd, checked in by Nelson Elhage <nelhage@mit.edu>, 16 years ago | |
|---|---|
|
|
| File size: 145 bytes | |
| Rev | Line | |
|---|---|---|
| [776c4bb] | 1 | package BarnOwl; |
| 2 | use strict; | |
| 3 | use warnings; | |
| 4 | ||
| [5aa33fd] | 5 | no warnings 'redefine'; |
| 6 | sub debug($) { | |
| [776c4bb] | 7 | warn "[DEBUG] ", shift, "\n" if $ENV{TEST_VERBOSE}; |
| 8 | } | |
| 9 | ||
| 10 | 1; |
Note: See TracBrowser
for help on using the repository browser.
