Emacs: यूनिवर्सल तर्क (सी-यू) एक समारोह

Question

में मैं एक समारोह में सी-यू उपयोग करना चाहते हैं (उदाहरण के लिए, regexp) जहां सी-यू के साथ बुला एक अलग प्रभाव पड़ता है। मैं Emacs में यह कैसे कर सकता हूँ? प्रलेखन यह नहीं दिखाता है कि Emacs Lisp के साथ ऐसा कैसे करें।

(defun test() 
    (interactive) 
    (align-regexp)) ; I would like to add the C-u prefix to this. 

Answer 1

(defun my/test() 
    (interactive) 
    (let ((current-prefix-arg 4)) ;; emulate C-u 
    (call-interactively 'align-regexp) ;; invoke align-regexp interactively 
    ) 
) 

आशा है कि मदद करता है।