UserDB: log timestamps to second granularity
[interchange.git] / code / SystemTag / scratchd.coretag
1 # Copyright 2002-2007 Interchange Development Group and others
2
3 # This program is free software; you can redistribute it and/or modify
4 # it under the terms of the GNU General Public License as published by
5 # the Free Software Foundation; either version 2 of the License, or
6 # (at your option) any later version.  See the LICENSE file for details.
7
8 # $Id: scratchd.coretag,v 1.6 2007-03-30 23:40:49 pajamian Exp $
9
10 UserTag scratchd            Order        name
11 UserTag scratchd            PosNumber    1
12 UserTag scratchd            addAttr
13 UserTag scratchd            Version      $Revision: 1.6 $
14 UserTag scratchd            Routine      <<EOR
15 sub {
16         my ($var, $opt) = @_;
17         my $value = delete $::Scratch->{$var};
18         if ($opt->{filter}) {
19                 $value = filter_value($opt->{filter}, $value, $var);
20         }
21         return $value;
22 }
23 EOR