This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
usesiteconfig should do just fine. no need for the additional
authorH.Merijn Brand <h.m.brand@xs4all.nl>
Fri, 8 Apr 2005 14:02:42 +0000 (14:02 +0000)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Fri, 8 Apr 2005 14:02:42 +0000 (14:02 +0000)
d_usesiteconfig. Small disadvantage is that now the name does
not reflect the variable (d_sitecustomize.U should have been
names usesitecustomize.U)

p4raw-id: //depot/metaconfig@24207

U/perl/d_sitecustomize.U

index 4b3bb8d..3934d31 100644 (file)
@@ -7,32 +7,26 @@
 ?RCS:
 ?RCS: $Log: d_sitecustomize.U,v $
 ?RCS:
 ?RCS:
 ?RCS: $Log: d_sitecustomize.U,v $
 ?RCS:
-?MAKE:usesitecustomize d_sitecustomize: Oldconfig Setvar
+?MAKE:usesitecustomize: Oldconfig Setvar
 ?MAKE: -pick add $@ %<
 ?S:usesitecustomize:
 ?S:    This variable is set to true when the user requires a mechanism that
 ?S:    allows the sysadmin to add entries to @INC at runtime.  This variable
 ?S:    being set, makes perl run '$sitelib/sitecustomize.pl' at startup.
 ?S:.
 ?MAKE: -pick add $@ %<
 ?S:usesitecustomize:
 ?S:    This variable is set to true when the user requires a mechanism that
 ?S:    allows the sysadmin to add entries to @INC at runtime.  This variable
 ?S:    being set, makes perl run '$sitelib/sitecustomize.pl' at startup.
 ?S:.
-?S:d_sitecustomize:
-?S:    This variable conditionally defines the USE_SITECUSTOMIZE symbol,
-?S:    and indicates whether sitecustomize is available (and should be used).
-?S:.
 ?C:USE_SITECUSTOMIZE:
 ?C:    This symbol, if defined, indicates that sitecustomize should
 ?C:    be used.
 ?C:.
 ?C:USE_SITECUSTOMIZE:
 ?C:    This symbol, if defined, indicates that sitecustomize should
 ?C:    be used.
 ?C:.
-?H:#$d_sitecustomize   USE_SITECUSTOMIZE               /**/
+?H:#$usesitecustomize  USE_SITECUSTOMIZE               /**/
 ?H:.
 ?H:.
-?LINT:set d_sitecustomize
 
 
-d_sitecustomize="$undef"
 case "$usesitecustomize" in
     $define|true|[Yy]*)
        usesitecustomize="$define"
 case "$usesitecustomize" in
     $define|true|[Yy]*)
        usesitecustomize="$define"
-       d_sitecustomize="$define"
        ;;
     *)
        usesitecustomize="$undef"
        ;;
     *)
        usesitecustomize="$undef"
+       ;;
     esac
 
     esac