Changeset 7869e48 for perl/lib


Ignore:
Timestamp:
Jan 12, 2013, 1:43:13 PM (9 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/lib
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • perl/lib/BarnOwl.pm

    rb303ba2 r7869e48  
    661661=head3 random_zephyr_signature
    662662
    663 Retrieve a random line from ~/.zsigs (except those beginning with '#') 
     663Retrieve a random line from ~/.zsigs (except those beginning with '#')
    664664and use it as the zephyr signature.
    665665
  • perl/lib/BarnOwl/Complete/Filter.pm

    r6dba228 r7869e48  
    8181        return $INCOMPLETE if $i == $INCOMPLETE;
    8282    }
    83    
     83
    8484    return $i; # Well, it looks like we're happy
    8585    # (Actually, I'm pretty sure this never happens...)
  • perl/lib/BarnOwl/Completion/Util.pm

    re6cec01 r7869e48  
    108108
    109109    my ($pfx, $base) = splitfile($string);
    110    
     110
    111111    opendir(my $dh, $dir) or return;
    112112    my @dirs = readdir($dh);
     
    119119            next;
    120120        }
    121        
     121
    122122        my ($text, $value, $done) = ($d, "${pfx}${d}", 1);
    123123
  • perl/lib/BarnOwl/Hooks.pm

    rb8a3e00 r7869e48  
    1212
    1313C<BarnOwl::Hooks> exports a set of C<BarnOwl::Hook> objects made
    14 available by BarnOwl internally. 
     14available by BarnOwl internally.
    1515
    1616=head2 USAGE
     
    135135        package BarnOwl;
    136136        if(*BarnOwl::format_msg{CODE}) {
    137             # if the config defines a legacy formatting function, add 'perl' as a style 
     137            # if the config defines a legacy formatting function, add 'perl' as a style
    138138            BarnOwl::create_style("perl", BarnOwl::Style::Legacy->new(
    139139                "BarnOwl::format_msg",
     
    163163        BarnOwl::error("Can't load BarnOwl::ModuleLoader, loadable module support disabled:\n$@");
    164164    }
    165    
     165
    166166    $mainLoop->check_owlconf();
    167167    $startup->run(0);
     
    171171sub _shutdown {
    172172    $shutdown->run;
    173    
     173
    174174    BarnOwl::shutdown() if *BarnOwl::shutdown{CODE};
    175175}
     
    179179
    180180    $receiveMessage->run($m);
    181    
     181
    182182    BarnOwl::receive_msg($m) if *BarnOwl::receive_msg{CODE};
    183183}
     
    187187
    188188    $newMessage->run($m);
    189    
     189
    190190    BarnOwl::new_msg($m) if *BarnOwl::new_msg{CODE};
    191191}
  • perl/lib/BarnOwl/Message/Zephyr.pm

    r6401db3 r7869e48  
    165165    } elsif($sender && !$self->is_private) {
    166166        # Possible future feature: (Optionally?) include the class and/or
    167         # instance of the message being replied to in the instance of the 
     167        # instance of the message being replied to in the instance of the
    168168        # outgoing personal reply
    169169        $class = 'MESSAGE';
Note: See TracChangeset for help on using the changeset viewer.