DCE-Perl

 view release on metacpan or  search on metacpan

login_base/login_base.xs  view on Meta::CPAN

	break;
    case 'b':
	if (strEQ(name, "base_v0_0_included"))
#ifdef sec_login_base_v0_0_included
	    return sec_login_base_v0_0_included;
#else
	    goto not_there;
#endif
	break;
    case 'c':
	if (strEQ(name, "credentials_private"))
#ifdef sec_login_credentials_private
	    return sec_login_credentials_private;
#else
	    goto not_there;
#endif
	break;
    case 'd':
	if (strEQ(name, "default_handle"))
#ifdef sec_login_default_handle
	    return sec_login_default_handle;
#else
	    goto not_there;



( run in 0.330 second using v1.01-cache-2.11-cpan-4d50c553e7e )