...
다른 자동 들여 쓰기(smartindent)나 자동 주석 처리 설정(formatoptions) 등으로도 붙여 넣기 시 원래 내용과 다르게 붙여 넣어지는 경우가 있습니다.
이런 모든 상황에서도 :set paste는 paste로는 원본 내용대로 붙여 넣기가 됩니다.
다음은 Xshell의 스크립트 기능과 사용자 정의 단추 키 설정 기능을 이용하여 붙여 넣기 기능을 구현한 VB 스크립트입니다.
| Code Block | ||
|---|---|---|
| ||
Sub Main
Set objHTML = CreateObject("htmlfile")
txt = objHTML.ParentWindow.ClipboardData.GetData("text")
txt = replace(txt, chr(13)+chr(10), chr(10))
xsh.Screen.Send chr(27)
xsh.Screen.Send ":set paste"+vbCr
xsh.Screen.Send "a"
xsh.Screen.Send txt
xsh.Screen.Send chr(27)
xsh.Screen.Send ":set nopaste"+vbCr
xsh.Screen.Send "a"
End Sub |
이 스크립트 파일을 '도구 → 옵션'의 '키보드와 마우스' 내 '키 매핑'에서 원하는 키에 등록하거나 빠른 명령 버튼에 등록하여 사용할 수 있습니다.
: 단축 키에 등록
: 빠른 명령 버튼에 등록
