Mercurial > pub > Impl

annotate _test/temp.pl @ 99:6dd659f6f66c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Minor changes, DOM schema is in development (in the aspect of a forms)
author wizard
date Wed, 05 May 2010 17:33:55 +0400
parents 964587c5183c
children cf3b6ef2be22
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
83
74bae30eb25e (no commit message)
wizard
parents:
diff changeset
1 #!/usr/bin/perl
93
0667064553ef fixed _is_class in activator
wizard
parents: 86
diff changeset
2 use strict;
0667064553ef fixed _is_class in activator
wizard
parents: 86
diff changeset
3
97
964587c5183c Added SecureCall to Web QueryHandlers stack
wizard
parents: 93
diff changeset
4 use IMPL::Security::Context;
93
0667064553ef fixed _is_class in activator
wizard
parents: 86
diff changeset
5
97
964587c5183c Added SecureCall to Web QueryHandlers stack
wizard
parents: 93
diff changeset
6 print IMPL::Security::Context->current->principal->name;