diff options
author | Andinus <andinus@nand.sh> | 2020-07-03 17:24:58 +0530 |
---|---|---|
committer | Andinus <andinus@nand.sh> | 2020-07-03 17:24:58 +0530 |
commit | 33de99a28ddc24e1bf6c694dff0a5fed06427e3e (patch) | |
tree | c8d3dfeea08bb7e8ba2da4b985c9eeddb280c209 /leo.pl | |
parent | ad6253ced70f17796634660199167a1f89a734e7 (diff) | |
download | leo-33de99a28ddc24e1bf6c694dff0a5fed06427e3e.tar.gz |
Sync irclogs, seperate sync options
By default it syncs only the config now & the user has to mention `irclogs' or `authinfo' to sync them.
Diffstat (limited to 'leo.pl')
-rwxr-xr-x | leo.pl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/leo.pl b/leo.pl index 462d2bf..0a3e540 100755 --- a/leo.pl +++ b/leo.pl @@ -22,7 +22,9 @@ GetOptions( ) or die "Error in command line arguments\n"; my %dispatch = ( - "sync emacs" => sub { Emacs::sync(\%options) }, + "sync emacs" => sub { $options{config} = 1; Emacs::sync(\%options); }, + "sync emacs irclogs" => sub { $options{irclogs} = 1; Emacs::sync(\%options); }, + "sync emacs authinfo" => sub { $options{authinfo} = 1; Emacs::sync(\%options); }, ); if ( $dispatch{ "@ARGV" } ) { |