From 33de99a28ddc24e1bf6c694dff0a5fed06427e3e Mon Sep 17 00:00:00 2001
From: Andinus <andinus@nand.sh>
Date: Fri, 3 Jul 2020 17:24:58 +0530
Subject: Sync irclogs, seperate sync options

By default it syncs only the config now & the user has to mention
`irclogs' or `authinfo' to sync them.
---
 leo.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'leo.pl')

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" } ) {
-- 
cgit 1.4.1-2-gfad0