1 package Org::Element::Footnote;
7 extends 'Org::Element';
9 our $VERSION = '0.23'; # VERSION
11 has name => (is => 'rw');
12 has is_ref => (is => 'rw');
13 has def => (is => 'rw');
16 my ($self, $args) = @_;
17 $log->tracef("name = %s", $self->name);
24 "[fn:", ($self->name // ""),
25 defined($self->def) ? ":".$self->def->as_string : "",
30 # ABSTRACT: Represent Org footnote reference and/or definition
38 Org::Element::Footnote - Represent Org footnote reference and/or definition
46 Derived from L<Org::Element>.
50 =head2 name => STR|undef
52 Can be undef, for anonymous footnote (but in case of undef, is_ref must be
53 true and def must also be set).
57 Set to true to make this a footnote reference.
59 =head2 def => TEXT ELEMENT
61 Set to make this a footnote definition.
65 =for Pod::Coverage as_string BUILD
69 Steven Haryanto <stevenharyanto@gmail.com>
71 =head1 COPYRIGHT AND LICENSE
73 This software is copyright (c) 2012 by Steven Haryanto.
75 This is free software; you can redistribute it and/or modify it under
76 the same terms as the Perl 5 programming language system itself.