Changeset 7869e48 for perl/modules/Facebook

Timestamp:

Jan 12, 2013, 1:43:13 PM (10 years ago)

Author:

Jason Gross <jgross@mit.edu>

Children:

e3a0d71, 4485285

Parents:

4626016

git-author:

Jason Gross <jgross@mit.edu> (01/12/13 13:13:18)

git-committer:

Jason Gross <jgross@mit.edu> (01/12/13 13:43:13)

Message:

Remove trailing whitespace

This commit was made with the command sequence

    for i in $(git ls-files | tr '\n' ' ');
    do
      echo $i; sed -i s'/\s\+$//g' "$(readlink -f $i)";
    done

Location:

perl/modules/Facebook/lib/Facebook

Files:

• Graph.pm (modified) (6 diffs)
• Graph/Cookbook/Recipe1.pod (modified) (4 diffs)
• Graph/Cookbook/Recipe2.pod (modified) (3 diffs)
• Graph/Picture.pm (modified) (1 diff)
• Graph/Publish.pm (modified) (1 diff)
• Graph/Publish/Event.pm (modified) (1 diff)
• Graph/Publish/Post.pm (modified) (5 diffs)
• Graph/Query.pm (modified) (5 diffs)
• Graph/Role/Uri.pm (modified) (1 diff)

perl/modules/Facebook/lib/Facebook/Graph.pm

@@ -87 +87 @@
 }
 
-sub authorize { 
+sub authorize {
     my ($self) = @_;
     return Facebook::Graph::Authorize->new(
@@ -302 +302 @@
  my $sarah_bownds = $fb->fetch('sarahbownds');
  my $perl_page = $fb->fetch('16665510298');
- 
+
 Or better yet:
 
@@ -311 +311 @@
     ->request
     ->as_hashref;
-    
+
  my $sarahs_picture_uri = $fb->picture('sarahbownds')->get_large->uri_as_string;
 
@@ -319 +319 @@
     ->request('https://graph.facebook.com/btaylor')
     ->as_hashref;
- 
- 
+
+
 =head2 Building A Privileged App
 
@@ -342 +342 @@
  my $q = Plack::Request->new($env);
  $fb->request_access_token($q->query_param('code'));
- 
+
 Or if you already had the access token:
 
  $fb->access_token($token);
- 
+
 Get some info:
 
@@ -419 +419 @@
 
  my $sarah = $fb->fetch('sarahbownds');
- 
+
  my $sarah = $fb->query->find('sarahbownds')->request->as_hashref;
 

perl/modules/Facebook/lib/Facebook/Graph/Cookbook/Recipe1.pod

@@ -64 +64 @@
 
  my $urlmap = Plack::App::URLMap->new;
- 
+
  # your code will go here
 
  $urlmap->to_app;
 
-All the code we have you add should go in the C<# your code will go here> block, in the order that we have you add it. 
- 
+All the code we have you add should go in the C<# your code will go here> block, in the order that we have you add it.
+
 =head2 Step 6: Create your Facebook::Graph object.
 
@@ -80 +80 @@
     secret      => 'Put Your Application Secret Here',
  );
- 
+
 Now you need the URL you entered in step 3, and the application ID and secret you got in step 4.
 
@@ -186 +186 @@
 
  sudo plackup --port 80 app.psgi
- 
+
 Now we point our browser to:
 
  http://www.yourapplication.com/facebook
- 
+
 Voila! You have created an authenticated Facebook app. If you would like to see this full program check out C<eg/recipe1.psgi> inside this distribution of L<Facebook::Graph>.
 
@@ -196 +196 @@
 =head1 CAVEATS
 
-You should never design an application using all the poor stuff we've done here, like using a shared L<Facebook::Graph> object, not using a Framework/CMS or at least L<Plack::Builder>, not using a templating system, passing the offline access token through the URL, etc. We've made comments about these things as we did them to warn you. These choices were made here B<only> because this is example code who's primary purpose is to show you how to use L<Facebook::Graph>, and not best practices for web development. 
+You should never design an application using all the poor stuff we've done here, like using a shared L<Facebook::Graph> object, not using a Framework/CMS or at least L<Plack::Builder>, not using a templating system, passing the offline access token through the URL, etc. We've made comments about these things as we did them to warn you. These choices were made here B<only> because this is example code who's primary purpose is to show you how to use L<Facebook::Graph>, and not best practices for web development.
 
 =head1 SEE ALSO

perl/modules/Facebook/lib/Facebook/Graph/Cookbook/Recipe2.pod

@@ -15 +15 @@
 You'll need to have all of the following modules installed in order to run this app (in addition to L<Facebook::Graph>):
 
-L<DateTime::Format::ICal> L<Dancer> L<Template> L<Data::ICal> L<XML::FeedPP> 
+L<DateTime::Format::ICal> L<Dancer> L<Template> L<Data::ICal> L<XML::FeedPP>
 
 =head2 Assumptions
@@ -65 +65 @@
  mkdir -p /opt/webapp
  cp -Rfp Facebook-Graph/eg/recipe2/* /opt/webapp
- 
+
 =head2 Step 6: Configure your app.
 
@@ -73 +73 @@
  vi config.yml
 
-Specifically we need to set the C<app_id> and C<secret> fields with information from our Facebook application settings page. And we need to update the C<postback> with the domain pointing to our server. 
+Specifically we need to set the C<app_id> and C<secret> fields with information from our Facebook application settings page. And we need to update the C<postback> with the domain pointing to our server.
 
 =head2 Step 7: Start it.

perl/modules/Facebook/lib/Facebook/Graph/Picture.pm

@@ -63 +63 @@
 
  my $fb = Facebook::Graph->new;
- 
+
  my $default_picture =  $fb->picture('16665510298')->uri_as_string;
  my $large_picture = $fb->picture('16665510298')->get_large->uri_as_string;

perl/modules/Facebook/lib/Facebook/Graph/Publish.pm

@@ -77 +77 @@
 =head1 DESCRIPTION
 
-This module shouldn't be used by you directly for any purpose. 
+This module shouldn't be used by you directly for any purpose.
 
 =head1 LEGAL

perl/modules/Facebook/lib/Facebook/Graph/Publish/Event.pm

@@ -183 +183 @@
 
  {"id":"1647395831_130068550371568"}
- 
- 
+
+
 =head1 TODO
 

perl/modules/Facebook/lib/Facebook/Graph/Publish/Post.pm

@@ -381 +381 @@
 =head2 set_privacy ( setting, options )
 
-A completely optional privacy setting. 
+A completely optional privacy setting.
 
 =head2 set_properties ( properties )
@@ -425 +425 @@
 
  $post->set_target_countries( ['US'] );
- 
+
 =head3 countries
 
@@ -436 +436 @@
 
  $post->set_target_regions( [6,53] );
- 
+
 =head3 regions
 
@@ -448 +448 @@
 
  $post->set_target_cities( [2547804] );
- 
+
 =head3 cities
 
@@ -460 +460 @@
 
  $post->set_target_locales( [6] );
- 
+
 =head3 locales
 

perl/modules/Facebook/lib/Facebook/Graph/Query.pm

@@ -79 +79 @@
     my ($self, $limit) = @_;
     $self->limit($limit);
-    return $self;    
+    return $self;
 }
 
@@ -109 +109 @@
     my ($self, $offset) = @_;
     $self->offset($offset);
-    return $self;    
+    return $self;
 }
 
@@ -215 +215 @@
 
  my $fb = Facebook::Graph->new;
- 
+
  my $perl_page = $fb->find('16665510298')
     ->include_metadata
     ->request
     ->as_hashref;
- 
+
  my $sarah_bownds = $fb->find('sarahbownds')
     ->select_fields(qw(id name))
@@ -254 +254 @@
     ->request
     ->as_hashref;
-    
+
 The above query, if you were read it like text, says: "Give me the user ids and full names of all users named Dave that have been created since yesterday, and limit the result set to the first 25."
 
@@ -314 +314 @@
 =head2 search ( query, context )
 
-Perform a keyword search on a group of items. 
+Perform a keyword search on a group of items.
 
 If you prefer not to search by keyword see the C<from> method.

perl/modules/Facebook/lib/Facebook/Graph/Role/Uri.pm

@@ -24 +24 @@
 =head1 DESCRIPTION
 
-Provides a C<uri> method in any class which returns a L<URI> object that points to the Facebook Graph API. 
+Provides a C<uri> method in any class which returns a L<URI> object that points to the Facebook Graph API.
 
 =head1 LEGAL