Re: Adding major-mode selection to new buffer

[carlmarcos--- via Users list for the GNU Emacs text editor <help-gnu-emacs@gnu.org>]

Jun 29, 2022, 16:05 by help-gnu-emacs@gnu.org:

Jean, have been trying to include the name in file-name, but I cannot see it being
introduced.

(file-name
             (concat rcd-temp-file-directory
                     (format-time-string "%Y-%m-%d-T%H:%M:%S--")
                     rcd-temp-buffer-name "-" name ".txt"))

>> (defun rcd-temp-buffer (&optional prefix name mode)
>>  "Generate new temporary buffer."
>>  (interactive "p")
>>  (let* ((file-name (concat rcd-temp-file-directory 
>>  (format-time-string "%Y-%m-%d-%H:%M:%S-")
>>  rcd-temp-buffer-name
>>  ".txt"))
>>  (buffer (or name (concat "*" rcd-temp-buffer-name "*"))))
>>  (switch-to-buffer (generate-new-buffer buffer))
>>  (setq buffer-file-name file-name)
>>  (if current-prefix-arg
>>  (let* ((mode (completing-read
>>  "Mode: "
>>  (map-keys rcd-temp-buffer-modes) nil t nil
>>  'rcd-temp-buffer-mode-history)))
>>  (funcall (intern mode)))
>>  (funcall (intern (or mode "fundamental-mode"))))
>>  buffer-file-name))
>>
>> -- 
>> Jean
>>
>> Take action in Free Software Foundation campaigns:
>> https://www.fsf.org/campaigns
>>
>> In support of Richard M. Stallman
>> https://stallmansupport.org/
>>