equal
deleted
inserted
replaced
2397 ]. |
2397 ]. |
2398 typeOfSelection := nil |
2398 typeOfSelection := nil |
2399 ] |
2399 ] |
2400 ! |
2400 ! |
2401 |
2401 |
2402 setClipboardText:something |
2402 setClipboardText:aString |
2403 "redefined to refuse to copy the password to the clipboard" |
2403 "redefined to refuse to copy the password to the clipboard" |
2404 |
2404 |
2405 passwordCharacter notNil ifTrue:[ |
2405 passwordCharacter notNil ifTrue:[ |
2406 self beep. |
2406 self beep. |
2407 ^ self |
2407 ^ self |
2408 ]. |
2408 ]. |
2409 ^ super setClipboardText:something |
2409 ^ super setClipboardText:aString |
|
2410 |
|
2411 "Modified (format): / 21-11-2016 / 23:37:07 / cg" |
2410 ! |
2412 ! |
2411 |
2413 |
2412 setLastStringToReplace: sel |
2414 setLastStringToReplace: sel |
2413 "redefined to refuse to remember the password" |
2415 "redefined to refuse to remember the password" |
2414 |
2416 |