[VMS] Fix IDENTIFICATION padding

[Tristan Gingold]

Hi,

tiny patch to fix the padding of the identification string.  Now left padded, 
which is more natural for humans.

Committed on trunk.
Tristan.

2012-02-21  Tristan Gingold  <ging...@adacore.com>

        * config/vms/vms-ld.c (main): Fix IDENTIFICATION padding.

Index: gcc/config/vms/vms-ld.c
===================================================================
--- gcc/config/vms/vms-ld.c     (revision 184425)
+++ gcc/config/vms/vms-ld.c     (working copy)
@@ -640,7 +640,7 @@
        {
          /* Comes from pragma Ident ().  */
           fprintf (optfile, "case_sensitive=yes\n");
-          fprintf (optfile, "IDENTIFICATION=\"%15.15s\"\n", &argv[i][17]);
+          fprintf (optfile, "IDENTIFICATION=\"%-.15s\"\n", &argv[i][17]);
           fprintf (optfile, "case_sensitive=NO\n");
        }
     }