Function: he-transfer-case

he-transfer-case is a byte-compiled function defined in hippie-exp.el.gz.

Signature

(he-transfer-case FROM-STR TO-STR)

Source Code

;; Defined in /usr/src/emacs/lisp/hippie-exp.el.gz
(defun he-transfer-case (from-str to-str)
  (cond ((string= from-str (substring to-str 0 (min (length from-str)
						    (length to-str))))
	 to-str)
	((not (he-ordinary-case-p to-str))
	 to-str)
	((string= from-str (downcase from-str))
	 (downcase to-str))
	((string= from-str (upcase from-str))
	 (upcase to-str))
	((string= from-str (he-capitalize-first from-str))
	 (he-capitalize-first to-str))
	((string= from-str (capitalize from-str))
	 (capitalize to-str))
	(t
	 to-str)))