Loading ...
Sorry, an error occurred while loading the content.

2539Zap to chararcter macro

Expand Messages
  • lechee lai
    Feb 9, 2010
      ; a quick hack try this :-)
      define-macro zap
      set-variable #l0 @ml1 "zap-char:" ""
      !if &less &len #l0 1
      ml-write "Cancel!"
      !return
      !endif
      !if ¬ &xse @wc #l0
      !while ¬ &sin @wc #l0
      forward-delete-char
      !done
      forward-delete-char
      !endif
      !emacro


      ___________________________________________________
      您的生活即時通 - 溝通、娛樂、生活、工作一次搞定!
      http://messenger.yahoo.com.tw/
    • Show all 3 messages in this topic