From 0048464449f5e72cd55fad628671e39064219e8c Mon Sep 17 00:00:00 2001 From: "Dr. Stephen Henson" Date: Mon, 6 Apr 2009 16:16:23 +0000 Subject: [PATCH] Use basename of objxref.pl not whole path in generated header. --- crypto/objects/obj_xref.h | 2 +- crypto/objects/objxref.pl | 7 +++++-- 2 files changed, 6 insertions(+), 3 deletions(-) diff --git a/crypto/objects/obj_xref.h b/crypto/objects/obj_xref.h index 7836f01d95..d5b9b8e198 100644 --- a/crypto/objects/obj_xref.h +++ b/crypto/objects/obj_xref.h @@ -1,4 +1,4 @@ -/* AUTOGENERATED BY crypto/objects/objxref.pl, DO NOT EDIT */ +/* AUTOGENERATED BY objxref.pl, DO NOT EDIT */ typedef struct { diff --git a/crypto/objects/objxref.pl b/crypto/objects/objxref.pl index 3fa584036e..731d3ae22c 100644 --- a/crypto/objects/objxref.pl +++ b/crypto/objects/objxref.pl @@ -54,10 +54,13 @@ my @srt2 = sort return $ap2 - $bp2; } @xrkeys; - + +my $pname = $0; + +$pname =~ s|^.[^/]/||; print <