SiteMap Search ElispArea HowTo Glossary RecentChanges News Problems Suggestions
Georgia, National Day

ErcUname

Last edit

Summary: Update

Changed:

< (defun erc-cmd-UNAME ()

to

> (defun erc-cmd-UNAME (&rest ignore)

Changed:

< (let* ((uname-output (replace-regexp-in-string "[ \n]+$" ""
< (shell-command-to-string "uname -a"))))

to

> (let ((uname-output
> (replace-regexp-in-string
> "[ \n]+$" "" (shell-command-to-string "uname -a"))))

Changed:

< (concat "{uname -a} ["
< uname-output
< "]"))))

to

> (concat "{uname -a} [" uname-output "]"))))

Changed:

< EmacsIRCClient

to

> [[ERC]]


This will display the output from running `uname -a’ on your system. In other words, it will display some interesting info about the kernel you are running and your operating system.

(defun erc-cmd-UNAME (&rest ignore)
  "Display the result of running `uname -a' to the current ERC
buffer."
  (let ((uname-output
         (replace-regexp-in-string
          "[ \n]+$" "" (shell-command-to-string "uname -a"))))
    (erc-send-message
     (concat "{uname -a} [" uname-output "]"))))

ERC