.\" Automatically generated by Pod::Man 4.07 (Pod::Simple 3.32)
.\"
.\" Standard preamble:
.\" ========================================================================
.de Sp \" Vertical space (when we can't use .PP)
.if t .sp .5v
.if n .sp
..
.de Vb \" Begin verbatim text
.ft CW
.nf
.ne \\$1
..
.de Ve \" End verbatim text
.ft R
.fi
..
.\" Set up some character translations and predefined strings.  \*(-- will
.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
.\" nothing in troff, for use with C<>.
.tr \(*W-
.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
.ie n \{\
.    ds -- \(*W-
.    ds PI pi
.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
.    ds L" ""
.    ds R" ""
.    ds C` ""
.    ds C' ""
'br\}
.el\{\
.    ds -- \|\(em\|
.    ds PI \(*p
.    ds L" ``
.    ds R" ''
.    ds C`
.    ds C'
'br\}
.\"
.\" Escape single quotes in literal strings from groff's Unicode transform.
.ie \n(.g .ds Aq \(aq
.el       .ds Aq '
.\"
.\" If the F register is >0, we'll generate index entries on stderr for
.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
.\" entries marked with X<> in POD.  Of course, you'll have to process the
.\" output yourself in some meaningful fashion.
.\"
.\" Avoid warning from groff about undefined register 'F'.
.de IX
..
.if !\nF .nr F 0
.if \nF>0 \{\
.    de IX
.    tm Index:\\$1\t\\n%\t"\\$2"
..
.    if !\nF==2 \{\
.        nr % 0
.        nr F 2
.    \}
.\}
.\" ========================================================================
.\"
.IX Title "SVN::Web::Blame 3pm"
.TH SVN::Web::Blame 3pm "2016-11-12" "perl v5.24.1" "User Contributed Perl Documentation"
.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
.\" way too many mistakes in technical documents.
.if n .ad l
.nh
.SH "NAME"
SVN::Web::Blame \- SVN::Web action to show blame/annotation information
.SH "SYNOPSIS"
.IX Header "SYNOPSIS"
In \fIconfig.yaml\fR
.PP
.Vb 9
\&  actions:
\&    ...
\&    blame:
\&      class: SVN::Web::Blame
\&      action_menu:
\&        show:
\&          \- file
\&        link_text: (view blame)
\&    ...
.Ve
.SH "DESCRIPTION"
.IX Header "DESCRIPTION"
Shows a specific revision of a file in the Subversion repository, with
blame/annotation information.
.SH "OPTIONS"
.IX Header "OPTIONS"
.IP "rev" 8
.IX Item "rev"
The revision of the file to show.  Defaults to the repository's
youngest revision.
.Sp
If this is not an interesting revision for this file, the repository history
is searched to find the youngest interesting revision for this file that is
less than \f(CW\*(C`rev\*(C'\fR.
.SH "TEMPLATE VARIABLES"
.IX Header "TEMPLATE VARIABLES"
.IP "at_head" 8
.IX Item "at_head"
A boolean value, indicating whether the user is currently viewing the
\&\s-1HEAD\s0 of the file in the repository.
.IP "context" 8
.IX Item "context"
Always \f(CW\*(C`file\*(C'\fR.
.IP "rev" 8
.IX Item "rev"
The revision that has been returned.  This is not necessarily the same
as the \f(CW\*(C`rev\*(C'\fR option passed to the action.  If the \f(CW\*(C`rev\*(C'\fR passed to the
action is not interesting (i.e., there were no changes to the file at that
revision) then the file's history is searched backwards to find the next
oldest interesting revision.
.IP "youngest_rev" 8
.IX Item "youngest_rev"
The youngest interesting revision of the file.
.IP "mimetype" 8
.IX Item "mimetype"
The file's \s-1MIME\s0 type, extracted from the file's \f(CW\*(C`svn:mime\-type\*(C'\fR
property.  If this is not set then \f(CW\*(C`text/plain\*(C'\fR is used.
.IP "blame_details" 8
.IX Item "blame_details"
An array of hashes.  Each entry in the array corresponds to a line from
the file.  Each hash contains the following keys:
.RS 8
.IP "line_no" 4
.IX Item "line_no"
The line number (starting with 0) in the file.
.IP "revision" 4
.IX Item "revision"
The revision in which this line was last changed.
.IP "author" 4
.IX Item "author"
The author of the revision that changed this line
.IP "date" 4
.IX Item "date"
The date on which the line was changed, formatted according to
\&\*(L"Time and date formatting\*(R" in SVN::Web.
.IP "line" 4
.IX Item "line"
The contents of this line.
.RE
.RS 8
.RE
.SH "EXCEPTIONS"
.IX Header "EXCEPTIONS"
None.
.SH "COPYRIGHT"
.IX Header "COPYRIGHT"
Copyright 2007 by Nik Clayton \f(CW\*(C`<nik@FreeBSD.org>\*(C'\fR.
.PP
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
.PP
See <http://www.perl.com/perl/misc/Artistic.html>