This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: Remove redundant SAVE_ERRNO
authorKarl Williamson <khw@cpan.org>
Sun, 4 Mar 2018 01:52:07 +0000 (18:52 -0700)
committerKarl Williamson <khw@cpan.org>
Sun, 4 Mar 2018 02:55:58 +0000 (19:55 -0700)
The errnos were already saved just above

locale.c

index d6d91ea..1634bab 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -998,7 +998,6 @@ S_emulate_setlocale(const int category,
 #  endif
 
         if (! uselocale(old_obj)) {
-            SAVE_ERRNO;
 
 #  ifdef DEBUGGING