如何通过删除命令彻底删除emacs中的无形文本？

Question

我希望将整个无形文本删除delete-char和backward-delete-char。任何简单的方法？

(put-text-property (point-at-bol) (point-at-eol) 'intangible t) 

kill-word和backward-kill-word将删除无形的文字，我想的*-char命令来这样做。

在我构建的用户界面中，一些关键文本是不可见的和无形的。因此，当用户在隐藏的，无形的文本之后（之前）按下DEL（C-d）时，整个文本应该消失。

谢谢！

Answer 1

使用Emacs的，没有任何初始化文件，以及您所提供的(put-text...代码，我可以在该行的开头的Mx删除字符删除炭（镉），并在该月底删除字符与Mx向后删除字符（删除（好吧，那真的是delete-backward-char））。

在澄清问题的编辑：

这两种意见，将删除整个无形区片：

(defadvice delete-char (around delete-char-intangible activate) 
    "when about to delete a char that's intangible, delete the whole region 
Only do this when #chars is 1" 
    (if (and (= (ad-get-arg 0) 1) 
      (get-text-property (point) 'intangible)) 
     (kill-region (point) (save-excursion (forward-char 1) (point))) 
    ad-do-it)) 

(defadvice delete-backward-char (around delete-backward-char-intangible activate) 
    "when about to delete a char that's intangible, delete the whole region 
Only do this interactively and when #chars is 1" 
    (if (and (= (ad-get-arg 0) 1) (> (point) (point-min)) 
      (get-text-property (- (point) 1) 'intangible)) 
     (kill-region (point) (save-excursion (backward-char 1) (point))) 
    ad-do-it)) 

建议检查，以确保该命令被调用的参数1，只有这样才会删除整个无形区域，否则就表现正常。