직사각형 선택의 채우기 영역?

Question

필자는 사각형 영역을 선택하고 그 내부의 텍스트 만 감싸고 사각형 경계 내에서 머물러야한다는 점을 제외하고 채우기 영역과 같은 것을하고 싶습니다. 이것을 할 수있는 방법이 있습니까?

Answer 1

편집 : 아, 나는 을 알았습니다. 전에이 기능을 발견했습니다.

cua의 사각형 편집 기능이이 기능을 제공합니다.

먼저 cua-selection-mode을 사용하도록 설정하십시오. 영구적으로 그것을 할 수 있습니다 그래서, 주요 변경 사항 붙여 넣기/복사/절단하지 않고 CUA에서 좋은 물건 :

(cua-selection-mode 1) 

을 그리고 C-RET 반대 구석 구석, 이동 지점을 표시하기 위해, 그리고 채우기 위해 정상적으로 Cq. C-RET 다시 사각형 모드를 종료하십시오.

CUA의 직사각형 편집은 정말 멋지다. 이에 대한 내용은 M-xfind-libraryRETcua-baseRET입니다. "CUA 직사각형 지원"제목을 찾습니다.

원래 대답은 :

(defun my-fill-rectangle (start end) 
    "`fill-region' within the confines of a rectangle." 
    (interactive "*r") 
    (let* ((indent-tabs-mode nil) 
     (content (delete-extract-rectangle start end))) 
    (goto-char start) 
    (insert-rectangle 
    (with-temp-buffer 
     (setq indent-tabs-mode nil 
      fill-column (length (car content))) 
     (insert-rectangle content) 
     (fill-region (point-min) (point-max)) 
     (goto-char (point-max)) 
     (move-to-column fill-column t) 
     (extract-rectangle (point-min) (point))))))