BibTeX Extension Example - Revision history

Pm705 at 13:22, 8 February 2010

2010-02-08T13:22:46Z

WikiSysop at 15:31, 8 February 2007

2007-02-08T15:31:12Z

WikiSysop at 15:31, 8 February 2007

2007-02-08T15:31:03Z

New page

This is an example for a rant on the [[How to contribute]] page.
<pre><nowiki>

package EPrints::Plugin::Export::BibTeXLocal;

use EPrints::Plugin::Export::BibTeX;

@ISA = ( "EPrints::Plugin::Export::BibTeX" );

use strict;

sub new
{
my( $class, %params ) = @_;

my $self = $class->SUPER::new(%params);
# just override the name...
$self->{name} = "BibTeX (foo group format)";

return $self;
}

sub convert_dataobj
{
my( $plugin, $dataobj ) = @_;

my $data = $plugin->SUPER::convert_dataobj($dataobj);

# add the authorbio field if possible.
if( $dataobj->exists_and_set( "authorbio" ) ) # just to be safe
{
$data->{bibtex}->{authorbio} = $dataobj->get_value( "authorbio" );
}
return $data;
}</nowiki></pre>

← Older revision		Revision as of 13:22, 8 February 2010
Line 1:		Line 1:
		+	[[Category:Contribute]]
		+	[[Category:Plugins]]
		+
	This is an example for a rant on the [[How to contribute]] page.		This is an example for a rant on the [[How to contribute]] page.
	<pre><nowiki>		<pre><nowiki>

@@ Line 1: / Line 1: @@
 This is an example for a rant on the [[How to contribute]] page.
 <pre><nowiki>
 package EPrints::Plugin::Export::BibTeXLocal;