Fixed the -status flag, should be more reliable.
This commit is contained in:
+5
-4
@@ -2034,8 +2034,8 @@ if (length($credentials)) {
|
|||||||
# Update server configuration (character limits, etc.)
|
# Update server configuration (character limits, etc.)
|
||||||
&update_server_config;
|
&update_server_config;
|
||||||
|
|
||||||
# Check and sync profile if enabled
|
# Check and sync profile if enabled (only for interactive mode)
|
||||||
&check_and_sync_profile($keyfile);
|
&check_and_sync_profile($keyfile) unless (length($status));
|
||||||
}
|
}
|
||||||
|
|
||||||
#### BOT/DAEMON MODE STARTUP ####
|
#### BOT/DAEMON MODE STARTUP ####
|
||||||
@@ -10933,10 +10933,11 @@ sub cosplit {
|
|||||||
$mode += 0;
|
$mode += 0;
|
||||||
$k = $orig_k;
|
$k = $orig_k;
|
||||||
|
|
||||||
# optimize whitespace
|
# optimize whitespace (but preserve intentional newlines)
|
||||||
$k =~ s/^\s+//;
|
$k =~ s/^\s+//;
|
||||||
$k =~ s/\s+$//;
|
$k =~ s/\s+$//;
|
||||||
$k =~ s/\s+/ /g;
|
# Only flatten whitespace if it doesn't contain intentional newlines
|
||||||
|
$k =~ s/\s+/ /g unless ($k =~ /\n/);
|
||||||
$z = &$lengthsub($k);
|
$z = &$lengthsub($k);
|
||||||
return ($k) if ($z <= $linelength); # also handles the trivial case
|
return ($k) if ($z <= $linelength); # also handles the trivial case
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user