Changeset 8953 for lang/perl/Net-OAuth-Consumer

Timestamp:

04/06/08 09:02:15 (5 years ago)

Author:

drry

Message:

lang/ruby/path_observer/trunk/lib/path_observer/observe_manager.rb
lang/ruby/path_observer/trunk/lib/path_observer/observer.rb
lang/ruby/path_observer/trunk/README
lang/ruby/date_time-duration/lib/date_time/duration.rb
lang/ruby/osxhotkey/README
lang/lua/bluasxom/lib/List.lua
lang/perl/Catalyst-Controller-AllowDisable?/trunk/lib/Catalyst/Controller/AllowDisable.pm
lang/perl/Catalyst-Controller-AllowDisable?/trunk/Makefile.PL
lang/perl/Catalyst-Controller-AllowDisable?/trunk/README
lang/perl/Catalyst-Helper-Lighty/trunk/LISENCE
lang/perl/Catalyst-Helper-Lighty/trunk/LICENSE
lang/perl/Catalyst-Helper-Lighty/trunk/MANIFEST
lang/perl/Catalyst-Plugin-FormValidator?-Lazy/trunk/lib/Catalyst/Plugin/FormValidator/Lazy.pm
lang/perl/Catalyst-Plugin-Log-Colorful/trunk/lib/Catalyst/Plugin/Log/Colorful.pm
lang/perl/WebService-Simple/trunk/lib/WebService/Simple.pm
lang/perl/WebService-Simple/trunk/lib/WebService/Simple/Response.pm
lang/perl/misc/bot-kouen-debyu.pl
lang/perl/misc/google_code_search.pl
lang/perl/misc/hatena-keyword.pl
lang/perl/Sledge-Plugin-FormValidator?-Lazy/trunk/lib/Sledge/Plugin/FormValidator/Lazy.pm
lang/perl/Net-OAuth-Consumer/trunk/lib/Net/OAuth/Consumer.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder/From/TwitterKensaku.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder/From/TwitterDiff.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder/From/Google.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder/From/Twitter.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder/From/URL.pm
lang/perl/Net-Twitter-FriendFinder?/trunk/lib/Net/Twitter/FriendFinder.pm
lang/perl/Data-LazyACL/trunk/lib/Data/LazyACL.pm
lang/perl/Data-LazyACL/trunk/README
lang/perl/Iterator-Simple/trunk/lib/Iterator/Simple.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/Media/Information.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/Search/User.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/Search/Media.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/Base.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/User/Video.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/User/Profile.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/User/Audio.pm
lang/perl/WWW-Stickam-API/trunk/lib/WWW/Stickam/API/User/Image.pm
lang/perl/Bundle-Porn/trunk/lib/Bundle/Porn.pm
lang/perl/Bundle-Porn/trunk/Makefile.PL
lang/perl/App-Starter/trunk/lib/App/Starter.pm
lang/perl/App-Starter/trunk/bin/app-starter.pl
lang/perl/App-Starter/trunk/bin/app-starter-catalyst.pl
lang/perl/Chaostr/trunk/lib/Chaostr/ValidateEm/Plugin/String.pm
lang/perl/Chaostr/trunk/lib/Catalyst/Plugin/FormValidateEm.pm
lang/perl/Chaostr/trunk/extlib
lang/perl/Acme-PSON/trunk/lib/Acme/PSON.pm
lang/perl/Acme-DRYCopyPaste/trunk/lib/Acme/DRYCopyPaste.pm
lang/perl/OAuth-Lite/trunk/lib/OAuth/Lite/Util.pm
lang/perl/MozRepl/trunk/lib/MozRepl/Plugin/JSON.pm
lang/perl/FormValidator-LazyWay?/trunk/lib/FormValidator/LazyWay/Plugin.pm
lang/perl/FormValidator-LazyWay?/trunk/lib/FormValidator/LazyWay/Results.pm
lang/perl/FormValidator-LazyWay?/trunk/lib/FormValidator/LazyWay.pm:

• SYNOPSIS
  

Files:

• lang/perl/Net-OAuth-Consumer/trunk/lib/Net/OAuth/Consumer.pm (modified) (4 diffs)

lang/perl/Net-OAuth-Consumer/trunk/lib/Net/OAuth/Consumer.pm

@@ -31 +31 @@
 our $VERSION = '0.01';
 
-=head1 SYNOPSYS
+=head1 SYNOPSIS
 
   use CGI;
@@ -37 +37 @@
   use Template;
   use DB_File;
-  
+
   my $q = CGI->new;
   tie my %oauth_token, "DB_File", "oauth_token.db";
@@ -49 +49 @@
     access_token_url => 'http://lopnor.homeip.net/picshare/api/access_token.cgi',
   });
-  
+
   if (my $authorized_token = $q->param('oauth_token')) {
     my $secret = $oauth_token{$authorized_token};
@@ -60 +60 @@
     print $q->header;
     print Template->new->process(\'<pre>[% res.content | html %]</pre>', {res => $res});
-  } 
+  }
   elsif ($q->param('start')) {
     my $res = $oauth->get_request_token;
     $oauth_token{$res->oauth_token} = $res->oauth_token_secret;
     $oauth->authorize;
-  } 
+  }
   else {
     print $q->header;