mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-11 20:05:03 -05:00
Extension: Paster Update
This commit is contained in:
parent
0ba8287468
commit
ed621254dd
@ -120,8 +120,15 @@ begin
|
||||
ScriptTextEx := S;
|
||||
|
||||
if (ExecRegExpr('([N|n][A|a][M|m][E|e]|[P|p][A|a][S|s]{2}|[P|p][I|i][N|n])', ScriptTextEx)) then
|
||||
if (MessageDlg(GetName + ' ' + GetVersion + ' Extension', 'Would you like to mask sensitive data?', mtConfirmation, [mbYes, mbNo], 0) = mrYes) then
|
||||
ScriptTextEx := ReplaceRegExpr('([N|n][A|a][M|m][E|e]|[P|p][A|a][S|s]{2}|[P|p][I|i][N|n])\s*\:\=\s*\''.*?\'';', ScriptTextEx, '$1 := ''*********'';', True);
|
||||
case (MessageDlg(GetName + ' ' + GetVersion + ' Extension', 'Would you like to mask sensitive data?', mtConfirmation, [mbYes, mbNo, mbCancel], 0)) of
|
||||
mrYes: ScriptTextEx := ReplaceRegExpr('([N|n][A|a][M|m][E|e]|[P|p][A|a][S|s]{2}|[P|p][I|i][N|n])\s*\:\=\s*\''.*?\'';', ScriptTextEx, '$1 := ''*********'';', True);
|
||||
mrNo: WriteLn('[Paster]Warning: Not masking data!');
|
||||
else
|
||||
begin
|
||||
WriteLn('[Paster]: Paste canceled');
|
||||
Exit;
|
||||
end;
|
||||
end;
|
||||
|
||||
Data := '{"language": "delphi", "code": "' + EncodeString(ScriptTextEx) + '", "private": ' + Lowercase(BoolToStr(Private_MenuItem.Checked)) + '}';
|
||||
JSONRequest(Data, HOST, 'pastes.newPaste');
|
||||
|
Loading…
Reference in New Issue
Block a user