Abolish function 'get-version-string because it is not used.

diff --git a/semi-def.el b/semi-def.el
index aa5fcb0..3f1ae75 100644 (file)
--- a/semi-def.el
+++ b/semi-def.el
@@ -262,16 +262,6 @@ FUNCTION.")
     ))
 
 
-;;; @ RCS version
-;;;
-
-(defsubst get-version-string (id)
-  "Return a version-string from RCS ID."
-  (and (string-match ",v \\([0-9][0-9.][0-9.]+\\)" id)
-       (substring id (match-beginning 1)(match-end 1))
-       ))
-
-
 ;;; @ Other Utility
 ;;;