소스 검색

Remove duplicate definition of `org-plist-delete'

* org.el (org-plist-delete): Remove duplicate definition.

Patch by Julien Danjou.
Carsten Dominik 15 년 전
부모
커밋
a6255a6ab7
1개의 변경된 파일0개의 추가작업 그리고 10개의 파일을 삭제
  1. 0 10
      lisp/org.el

+ 0 - 10
lisp/org.el

@@ -17997,16 +17997,6 @@ With prefix arg UNCOMPILED, load the uncompiled versions."
       (concat "\"" (mapconcat 'identity (split-string s "\"") "\"\"") "\"")
       (concat "\"" (mapconcat 'identity (split-string s "\"") "\"\"") "\"")
     s))
     s))
 
 
-(defun org-plist-delete (plist property)
-  "Delete PROPERTY from PLIST.
-This is in contrast to merely setting it to 0."
-  (let (p)
-    (while plist
-      (if (not (eq property (car plist)))
-	  (setq p (plist-put p (car plist) (nth 1 plist))))
-      (setq plist (cddr plist)))
-    p))
-
 (defun org-force-self-insert (N)
 (defun org-force-self-insert (N)
   "Needed to enforce self-insert under remapping."
   "Needed to enforce self-insert under remapping."
   (interactive "p")
   (interactive "p")