Delete obsolete krb5-mark-cstyle.el. (replaced by a python script)

git-svn-id: svn://anonsvn.mit.edu/krb5/trunk@23127 dc483132-0cff-0310-8789-dd5450dbe970

1 files changed, 0 insertions, 28 deletions

diff --git a/src/util/krb5-mark-cstyle.el b/src/util/krb5-mark-cstyle.el
deleted file mode 100644
index 444b18981a..0000000000
--- a/src/util/krb5-mark-cstyle.el
+++ /dev/null
@@ -1,28 +0,0 @@
-;;; -*- mode: emacs-lisp; indent-tabs-mode: nil -*-
-(if (not noninteractive)
-    (error "to be used only with -batch"))
-
-(defvar bsd-style nil)
-(defvar krb5-style nil)
-
-(push '("-cstyle-bsd" . (lambda (ignored) (setq bsd-style t))) command-switch-alist)
-(push '("-cstyle-krb5" . (lambda (ignored) (setq krb5-style t))) command-switch-alist)
-
-;; Avoid vc-mode interference.
-(setq vc-handled-backends nil)
-(while command-line-args-left
-  (let ((filename (car command-line-args-left))
-        (error nil)
-        ;; No backup files?
-        (make-backup-files nil))
-    (find-file filename)
-
-    (goto-char (point-min))
-    (if (looking-at "\\s-*/\\*\\s-*-\\*-.*-\\*-\\s-*\\*/\\s-*\n")
-     (delete-region (match-beginning 0) (match-end 0)))
-    (if bsd-style
-        (insert "/* -*- mode: c; c-file-style: \"bsd\"; indent-tabs-mode: t -*- */\n")
-      (insert "/* -*- mode: c; c-basic-offset: 4; indent-tabs-mode: nil -*- */\n"))
-    (save-buffer)
-    (kill-buffer)
-    (setq command-line-args-left (cdr command-line-args-left))))