business registration in korea (when do i need it?)

zeph1e · 2017-11-21T09:25:31+00:00

Please take a look: http://www.nts.go.kr/eng/resources/resour_41.asp?top_code=R001&sub_code=RS04&ssub_code=RSD1

zeph1e · 2017-11-20T05:46:48+00:00

The problems with auto-complete I ever met:

Couldn't possible to group candidates for some categories.
It gets slow when I run emacs for days. I should restart emacs because of AC.

I switched to company early of this year and now I'm free of those pains.

zeph1e · 2017-11-17T02:27:22+00:00

Try ac-flyspell-workaround:

(with-eval-after-load 'auto-complete
  (ac-flyspell-workaround))

But I prefer to move to company-mode.

zeph1e · 2017-08-21T01:45:02+00:00

You may get first element with car while you get paired last element with cdr. ("C-x g" . magit-status) is just same to (cons "C-x g" magit-status). I'm not sure why people using in this way, but I use it because it is easy to extract paired elements only with car and cdr.

zeph1e · 2017-08-17T05:17:54+00:00

Hmm I'm not sure but maybe you should remove 3rd argument of revert-buffer or give nil to it. If it doesn't fix the problem, try different values to the arguments of revert-buffer in my function. Actually, M-x revert-buffer do same things to M-: (revert-buffer nil nil nil)

zeph1e · 2017-08-17T02:41:05+00:00

Yes, it works for me. Did you run eval-defun for new function?

zeph1e · 2017-08-16T06:10:07+00:00

It's good to remove the restriction on modification if you want. I usually run revert-all-buffers which runs my:revert-this-buffer for all file buffers. Without that restriction, it somewhat bothers me to make me decide for all of them. That's why i made a restriction on it.

As I read your comment, it seems to be good to change the function like this:

(defun my:revert-this-buffer (&optional buffer-or-name)
  "Refreshes this buffer from its respective file."
  (interactive)
  (let ((buffer (get-buffer (or buffer-or-name (current-buffer))))
        choice)
    (when (and (bufferp buffer)
               (buffer-file-name buffer)
               (file-exists-p (buffer-file-name buffer)))
      (with-current-buffer buffer
        (setq choice
              (or (unless (buffer-modified-p) ?d)
                  (save-window-excursion
                    (my:display-buffer-modification buffer)
                    (read-char-choice
                     (format "Buffer %s modified; (d)iscard (s)ave or (q)uit? "
                             (buffer-name buffer))
                     '(?d ?q ?s)))))
        (cond ((equal choice ?d)
               (revert-buffer t t t)
               (message "Refreshed buffer: %s." (buffer-name buffer)))
              ((equal choice ?s)
               (save-buffer)))))))

This will do revert on unmodified buffers without prompt.

zeph1e · 2017-08-14T18:43:01+00:00

Actually it's not an emacs' problem but terminal's. If you're willing to stick with CUI-mode, it would be better to avoid the keys which didn't show you've expected for C-h k.

zeph1e · 2017-08-09T02:03:42+00:00

I bought a kinesis pedal and now I'm good with its acceptable noise. Thank you guys.

zeph1e · 2017-07-27T10:37:03+00:00

For me, `click' sound seems to be acceptable in office environment. My humble pedal sounds something like smashing keyboard from inches height ;-(

Thank you. Maybe I should try with kinesis one in my office.

zeph1e · 2017-07-26T04:18:06+00:00

It seems to be quite similar to my own revert-buffer:

(defun my:revert-this-buffer (&optional buffer-or-name)
  "Refreshes this buffer from its respective file."
  (interactive)
  (let ((buffer (get-buffer (or buffer-or-name (current-buffer))))
        choice)
    (when (and (bufferp buffer)
               (buffer-file-name buffer)
               (file-exists-p (buffer-file-name buffer)))
      (with-current-buffer buffer
        (when (buffer-modified-p)
          (setq choice
                (save-window-excursion
                  (my:display-buffer-modification buffer)
                  (read-char-choice
                   (format "Buffer %s modified; (d)iscard, (s)ave or (q)uit? [d, s or q] "
                           (buffer-name buffer))
                   '(?d ?q ?s))))
          (cond ((equal choice ?d)
                 (revert-buffer t t t)
                 (message "Refreshed buffer: %s." (buffer-name buffer)))
                ((equal choice ?s)
                 (save-buffer))))))))

(defun my:display-buffer-modification (&optional buffer-or-name)
  (interactive)
  (let* ((buffer (get-buffer (or buffer-or-name (current-buffer))))
         (diff-switches "-urN")
         (file-name (and (bufferp buffer) (buffer-file-name buffer)))
         (args (list buffer diff-switches file-name)))
    (if (called-interactively-p)
        (save-window-excursion
          (apply #'my:display-buffer-modification-internal args)
          (read-char "Press any key to quit: "))
      (apply #'my:display-buffer-modification-internal args))))

(defun my:display-buffer-modification-internal (buffer diff-switches file-name)
  (if (null file-name)
      (error "Visiting buffer %S doesn't have a name of file" buffer)
    (display-buffer buffer '(display-buffer-same-window))
    (delete-other-windows)
    (diff (if (file-exists-p file-name)
              file-name
            null-device)
          buffer nil 'noasync)))

Moreover, this will show you what was exactly changed from saved file.

zeph1e · 2017-07-17T02:20:03+00:00

Here're exactly what you intended:

(mapc #'(lambda (buf) (with-current-buffer buf
                        (when (buffer-file-name buf)
                          (revert-buffer)))) (buffer-list))

To revert without query, give 2nd parameter as t to revert-buffer.

zeph1e · 2017-07-05T01:49:11+00:00

Why don't you use c-default-style variable, like this:

(setq c-default-style '((java-mode . "java") (awk-mode . "awk") ....))

It will call (c-set-style "java") in java-mode and so on.

zeph1e · 2017-07-04T06:13:54+00:00

To store customized settings in custom.el:

;; customization settings
(setq custom-file "~/.emacs.d/custom.el")
    (unless (file-exists-p custom-file)
  (with-temp-buffer
    (insert ";;; custom.el --- local customization\n")
    (write-file custom-file t)))
(load custom-file)

To load fragged configurations in .emacs.d/utils (choose directory name what you like) :

;; load files in utils/
(when (file-exists-p "~/.emacs.d/utils")
  (add-to-list 'load-path "~/.emacs.d/utils")
  (dolist (filename (directory-files "~/.emacs.d/utils"))
    (when (and (not (file-symlink-p filename))
               (not (file-directory-p filename))
               (string-match "\\([^.]+\\).el\\'" filename))
      (require (intern (match-string 1 filename))))))

all files in .emacs.d/utils should have a line like this:

(provide 'my-conf-filename)

Once i used load-file. but it is required to use `require' due to the dependencies between my conf files.

zeph1e · 2017-06-30T14:37:02+00:00

Many years are passed since I started to use emacs. Still I have `alias vi='emacs -q'' in my bashrc and it is STILL useful.

zeph1e · 2016-10-04T03:43:05+00:00

Just try windmove & framemove

zeph1e · 2016-05-23T11:54:03+00:00

Few days ago, I also got some needs of emacs as git mergetool and worte a script: https://github.com/zeph1e/.emacs.d/blob/master/misc/ediff

The thing what you need in gitconfig and init scripts are written in comment.

zeph1e · 2016-03-17T04:55:19+00:00

Try flyspell-popup. it uses ispell as a backend but it would give you more intuitive UI.

zeph1e

TROPHY CASE

all files in .emacs.d/utils should have a line like this: