Twitter - Revision history

Drn@ecs.soton.ac.uk: Updated instructions to use HTTPS and version 1.1 of the API, as required by Twitter.

2016-06-01T11:25:35Z

Updated instructions to use HTTPS and version 1.1 of the API, as required by Twitter.

Tdb01r at 14:06, 31 March 2011

2011-03-31T14:06:23Z

Tdb01r at 14:05, 31 March 2011

2011-03-31T14:05:37Z

Tdb01r: /* Adding a twitter channel to eprints is dead easy. */

2011-03-31T14:01:40Z

‎Adding a twitter channel to eprints is dead easy.

Pm705 at 17:47, 9 February 2010

2010-02-09T17:47:34Z

Pm705 at 17:12, 8 February 2010

2010-02-08T17:12:52Z

Dkane at 19:44, 16 September 2009

2009-09-16T19:44:10Z

Dkane at 19:43, 16 September 2009

2009-09-16T19:43:41Z

Cjg at 15:06, 6 June 2008

2008-06-06T15:06:24Z

Cjg: New page: Adding a twitter channel to eprints is dead easy.

  $c->{eprint_status_change} = sub  {         my( $eprint, $old_status, $new_status ) = @_;          if( $new_status eq "arc...

2008-06-06T14:59:09Z

New page: Adding a twitter channel to eprints is dead easy. <pre><nowiki> $c->{eprint_status_change} = sub { my( $eprint, $old_status, $new_status ) = @_; if( $new_status eq "arc...

New page

Adding a twitter channel to eprints is dead easy.

<pre><nowiki>
$c->{eprint_status_change} = sub
{
my( $eprint, $old_status, $new_status ) = @_;

if( $new_status eq "archive" )
{
my $twitter_username="username";
my $twitter_password="password";
my $cmd1 = "curl -s 'http://is.gd/api.php?longurl=".$eprint->get_url."'";
my $shorturl = `$cmd1`;
my $title = $eprint->get_value( "title" );
$title =~ s/'/\\'/g;
my $cmd2 = "curl --basic -s --user $twitter_username:$twitter_password --data status='$title - $shorturl' http://twitter.com/statuses/update.xml";
`$cmd2 &`;
}
};
</nowiki></pre>

@@ Line 5: / Line 5: @@
 == Installation ==
-Install [http://search.cpan.org/search?query=LWP%3A%3AAuthen%3A%3AOAuth LWP::Authen::OAuth].
+Install [http://search.cpan.org/search?query=LWP%3A%3AAuthen%3A%3AOAuth LWP::Authen::OAuth] and [http://search.cpan.org/search?query=LWP%3A%3AProtocol%3A%3Ahttps LWP::Protocol::https]
 Set up a new [http://twitter.com Twitter] account for your repository if not already done so.
@@ Line 55: / Line 55: @@
                          %{$eprint->{session}->config( "twitter", "authen" )},
                  );
-                 my $r = $oua->post( 'http://api.twitter.com/1/statuses/update.json', [
+                 my $r = $oua->post( 'https://api.twitter.com/1.1/statuses/update.json', [
                          status => $tweet,
                  ] );

← Older revision		Revision as of 14:06, 31 March 2011
Line 1:		Line 1:
	[[Category:EPrints 3 Plugins]]		[[Category:EPrints 3 Plugins]]
		+
		+	This recipe shows how to add tweets to your repository that occur whenever a new item is deposited.

	== Installation ==		== Installation ==

@@ Line 1: / Line 1: @@
 [[Category:EPrints 3 Plugins]]
-Set up a new twitter account for your repository if not already done so.
+== Installation ==
-Sign into your twitter account on [https://dev.twitter.com/] and then click "Register an app". Fill in the form:
+Install [http://search.cpan.org/search?query=LWP%3A%3AAuthen%3A%3AOAuth LWP::Authen::OAuth].
 * Name: enter your repository URL
@@ Line 13: / Line 16: @@
 * Default Access Type: Read & Write
-In your repository add the following to a new configuration file in cfg.d/ (e.g. called twitter.pl):
+In your repository add to a new configuration file in cfg.d/ (e.g. ''twitter.pl''), substituting the values given below:
-* Change ''oauth_consumer_key'' and ''oauth_consumer_secret'' to the values found on the twitter application page.
+* Change ''oauth_consumer_key'' and ''oauth_consumer_secret'' to the values found on the Twitter application page.
-* Change ''oauth_token'' and ''oauth_token_secret'' to the values found on the "My Access Token" page linked from the twitter application page.
+* Change ''oauth_token'' and ''oauth_token_secret'' to the values found on the "My Access Token" page linked from the Twitter application page.
 <pre><nowiki>
-use LWP::Authen::OAuth; # install from CPAN
+use LWP::Authen::OAuth;
 $c->{twitter}->{authen} = {
@@ Line 65: / Line 68: @@
 * Log in and deposit an item to test
-==== Examples ====
+=== Examples ===
 * http://twitter.com/eprintsecs - ECS EPrints, Southampton

@@ Line 2: / Line 2: @@
 == Adding a twitter channel to eprints is dead easy. ==
-==== First set up a twitter account for your repository. ====
+Set up a new twitter account for your repository if not already done so.
-Add the following to a new .pl file in cfg.d/
+Sign into your twitter account on [https://dev.twitter.com/] and then click "Register an app". Fill in the form:
-You could name this file ''twitter.pl'', for example
+* Name: enter your repository URL
-Add the username and password for the account.
+In your repository add the following to a new configuration file in cfg.d/ (e.g. called twitter.pl):
 <pre><nowiki>
- $c->{eprint_status_change} = sub
+use LWP::Authen::OAuth; # install from CPAN
-−
          my( $eprint, $old_status, $new_status ) = @_;
          if( $new_status eq "archive" )
+         {
-                 my $twitter_username="username";
+                 my $ua = LWP::UserAgent->new;
-                 my $twitter_password="password";
+                 my $url = URI->new( 'http://is.gd/api.php' );
-                my $cmd1 = "curl -s 'http://is.gd/api.php?longurl=".$eprint->get_url."'";
+                $url->query_form(
-                 my $shorturl = `$cmd1`;
+                        longurl => $eprint->get_url
                  my $title = $eprint->get_value( "title" );
-                 $title =~ s/'/\\'/g;
-                 my $cmd2 = "curl --basic -s --user $twitter_username:$twitter_password --data status='$title - $shorturl' http://twitter.com/statuses/update.xml";
+                        use bytes;
-                 `$cmd2 &`;
+                        $title =~ s/^(.{0,100})/$1/;
+         }
- };
 </nowiki></pre>
 * Restart Apache ( /etc/init.d/apache2 force-reload , or similar)
-* Then log in and deposit an item to test
+* Log in and deposit an item to test
 * http://twitter.com/eprintsecs - ECS EPrints, Southampton

← Older revision		Revision as of 17:47, 9 February 2010
Line 1:		Line 1:
−	[[Category:Plugins]]	+	[[Category:EPrints 3 Plugins]]
	== Adding a twitter channel to eprints is dead easy. ==		== Adding a twitter channel to eprints is dead easy. ==

← Older revision		Revision as of 17:12, 8 February 2010
Line 1:		Line 1:
		+	[[Category:Plugins]]
	== Adding a twitter channel to eprints is dead easy. ==		== Adding a twitter channel to eprints is dead easy. ==

← Older revision		Revision as of 19:44, 16 September 2009
Line 34:		Line 34:


−	Add your twitter to the list:	+	==== Add your twitter to the list: ====
	* http://twitter.com/eprintsecs - ECS EPrints, Southampton		* http://twitter.com/eprintsecs - ECS EPrints, Southampton