From 7314609cd930ffce9badcf16157855fa0c7d28cb Mon Sep 17 00:00:00 2001
From: Eugeni Dodonov <eugeni@mandriva.org>
Date: Wed, 2 Feb 2011 15:29:20 +0000
Subject: 1.2.27:  - add cp_afx command

---
 NEWS                   | 4 ++++
 lib/MDK/Common.pm.pl   | 2 +-
 lib/MDK/Common/File.pm | 7 ++++++-
 3 files changed, 11 insertions(+), 2 deletions(-)

diff --git a/NEWS b/NEWS
index 73f64ae..b026727 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,7 @@
+Version 1.2.27 - 2 February 2011, by Eugeni Dodonov
+
+- add cp_afx command
+
 Version 1.2.26.1 - 24 October 2010, by Thierry Vignaud
 
 - append_to_file: better error message making easier to pinpoint actual place
diff --git a/lib/MDK/Common.pm.pl b/lib/MDK/Common.pm.pl
index adec57b..7a61a60 100644
--- a/lib/MDK/Common.pm.pl
+++ b/lib/MDK/Common.pm.pl
@@ -73,7 +73,7 @@ our @ISA = qw(Exporter);
 # perl_checker: RE-EXPORT-ALL
 our @EXPORT = map { @$_ } map { values %{'MDK::Common::' . $_ . 'EXPORT_TAGS'} } grep { /::$/ } keys %MDK::Common::;
 
-our $VERSION = "1.2.26.1";
+our $VERSION = "1.2.27";
 
 1;
 EOF
diff --git a/lib/MDK/Common/File.pm b/lib/MDK/Common/File.pm
index 48fd702..8c1659b 100644
--- a/lib/MDK/Common/File.pm
+++ b/lib/MDK/Common/File.pm
@@ -83,6 +83,10 @@ just like "cp -f"
 
 just like "cp -af"
 
+=item cp_afx(FILES, DEST)
+
+just like "cp -afx"
+
 =item linkf(SOURCE, DESTINATION)
 
 =item symlinkf(SOURCE, DESTINATION)
@@ -139,7 +143,7 @@ use File::Sync qw(fsync);
 
 use Exporter;
 our @ISA = qw(Exporter);
-our @EXPORT_OK = qw(dirname basename cat_ cat_utf8 cat_or_die cat_utf8_or_die cat__ output output_p output_with_perm append_to_file linkf symlinkf renamef mkdir_p rm_rf cp_f cp_af touch all all_files_rec glob_ substInFile expand_symlinks openFileMaybeCompressed catMaybeCompressed);
+our @EXPORT_OK = qw(dirname basename cat_ cat_utf8 cat_or_die cat_utf8_or_die cat__ output output_p output_with_perm append_to_file linkf symlinkf renamef mkdir_p rm_rf cp_f cp_af cp_afx touch all all_files_rec glob_ substInFile expand_symlinks openFileMaybeCompressed catMaybeCompressed);
 our %EXPORT_TAGS = (all => [ @EXPORT_OK ]);
 
 sub dirname { local $_ = shift; s|[^/]*/*\s*$||; s|(.)/*$|$1|; $_ || '.' }
@@ -230,6 +234,7 @@ sub cp_with_option {
 
 sub cp_f  { cp_with_option('f', @_) }
 sub cp_af { cp_with_option('af', @_) }
+sub cp_afx { cp_with_option('afx', @_) }
 
 sub touch {
     my ($f) = @_;
-- 
cgit v1.2.1