Change 30041 by [EMAIL PROTECTED] on 2007/01/27 22:08:55

        Subject: [EMAIL PROTECTED] blead on OpenVMS doesn't build
        From: Abe Timmerman <[EMAIL PROTECTED]>
        Date: Sat, 27 Jan 2007 17:26:47 +0100
        Message-Id: <[EMAIL PROTECTED]>
        
        Disable DECterm support by default, and when we enable it, 
        make sure the image we need is installed, not merely present.

Affected files ...

... //depot/perl/configure.com#249 edit

Differences ...

==== //depot/perl/configure.com#249 (text) ====
Index: perl/configure.com
--- perl/configure.com#248~29572~       2006-12-17 17:11:41.000000000 -0800
+++ perl/configure.com  2007-01-27 14:08:55.000000000 -0800
@@ -51,7 +51,7 @@
 $ use64bitint = "n"
 $ uselargefiles = "n"
 $ usestdstat = "n"
-$ usedecterm = "y"
+$ usedecterm = "n"
 $ usesitecustomize = "n"
 $ C_Compiler_Replace = "CC="
 $ thread_upcalls = "MTU="
@@ -2557,11 +2557,31 @@
 $ ELSE
 $     d_unlink_all_versions = "undef"
 $ ENDIF
-$ bool_dflt = "y"
-$ IF F$TYPE(usedecterm) .NES. "" 
+$!
+$! To avoid 'SYSTEM-F-PROTINSTALL, protected images must be installed'
+$! at run time, we must check that the DECterm image is both present
+$! and installed as a known image.
+$!
+$ decterm_capable = "FALSE"
+$ dflt = "SYS$SHARE:DECW$TERMINALSHR12.EXE"
+$ IF F$SEARCH(dflt) .NES. "" 
+$ THEN 
+$    decterm_capable = F$FILE_ATTRIBUTES(dflt, "KNOWN")
+$ ELSE
+$     dflt = "SYS$SHARE:DECW$TERMINALSHR.EXE"
+$     IF F$SEARCH(dflt) .NES. "" THEN decterm_capable = 
F$FILE_ATTRIBUTES(dflt, "KNOWN")
+$ ENDIF
+$!
+$ IF F$TYPE(usedecterm) .NES. ""
 $ THEN
-$       dflt = f$search("SYS$SHARE:DECW$TERMINALSHR*.EXE")
-$       IF dflt .EQS. "" THEN bool_dflt = "n"
+$       if usedecterm .or. usedecterm .eqs. "define"
+$       then
+$         bool_dflt="y"
+$       else
+$         bool_dflt="n"
+$       endif
+$ ELSE
+$       bool_dflt="n"
 $ ENDIF
 $ IF .NOT. use_debugging_perl THEN bool_dflt = "n"
 $ echo ""
@@ -2571,6 +2591,11 @@
 $ rp = "Build with DECterm Perl debugger support, if available? [''bool_dflt'] 
"
 $ GOSUB myread
 $ usedecterm=ans
+$ IF (usedecterm .OR. usedecterm .EQS. "define") .AND. .NOT. decterm_capable
+$ THEN
+$     echo4 "No installed DECterm image found, disabling..."
+$     usedecterm = "n"
+$ ENDIF
 $! CC Flags
 $ echo ""
 $ echo "Your compiler may want other flags.  For this question you should 
include"
End of Patch.

Reply via email to