重命名为 chsrc_use_this_source()

This commit is contained in:
Aoran Zeng
2025-08-22 14:40:25 +08:00
parent c8818e4923
commit 64924a7ffc
56 changed files with 59 additions and 59 deletions

View File

@@ -57,7 +57,7 @@ pl_perl_getsrc (char *option)
void
pl_perl_setsrc (char *option)
{
use_this_source(pl_perl);
chsrc_use_this_source (pl_perl);
char *cmd = xy_strcat (3,
"perl -MCPAN -e \"CPAN::HandleConfig->load(); CPAN::HandleConfig->edit('urllist', 'unshift', '", source.url, "'); CPAN::HandleConfig->commit()\"");