Fix generate.pl for Perl 5.6.1.

[pspp] / src / autorecode.c

diff --git a/src/autorecode.c b/src/autorecode.c
index a28b13bdcac0e8c3cd2a6257f4019de448324a6f..0b6857ddefbced95684e0e57e983c976956124d8 100644 (file)
--- a/src/autorecode.c
+++ b/src/autorecode.c
@@ -14,8 +14,8 @@
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
-   02111-1307, USA. */
+   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+   02110-1301, USA. */
 
 #include <config.h>
 #include "error.h"
@@ -151,7 +151,7 @@ cmd_autorecode (void)
          goto lossage;
        }
       for (j = 0; j < i; j++)
-       if (!strcmp (arc.dst_names[i], arc.dst_names[j]))
+       if (!strcasecmp (arc.dst_names[i], arc.dst_names[j]))
          {
            msg (SE, _("Duplicate variable name %s among target variables."),
                 arc.dst_names[i]);