translating the Hyper modifier to C-c

translating the Hyper modifier to C-c

[David Wallin]

The subject pretty much says it all. I want to make the hyper modifier
mean C-c, e.g., pressing 'H-d' should be equivalent of/translated into
'C-c d'.


cheers,

--david.

Re: translating the Hyper modifier to C-c

[Kevin Rodgers]

David Wallin wrote:
 > The subject pretty much says it all. I want to make the hyper modifier
 > mean C-c, e.g., pressing 'H-d' should be equivalent of/translated into
 > 'C-c d'.

I think you need to explicitly bind each character:

;; Define each Hyper-modified printable ASCII character (space through 
tilde)
;; as a keyboard macro: Control-c followed by the character itself
(let ((char ? ))
   (while (<= char ?~)
     (global-set-key (vector (car (read-from-string (format "?\\H-%c" 
char))))
                     (format "\C-c%c" char))
     (setq char (1+ char))))

-- 
Kevin Rodgers