/[erbot]/erbot/erbutils.el
ViewVC logotype

Diff of /erbot/erbutils.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.24 by pkazmier, Sun Jan 9 01:10:42 2005 UTC revision 1.25 by deego, Tue Jul 5 15:03:46 2005 UTC
# Line 1  Line 1 
1  ;;; erbutils.el ---  ;;; erbutils.el ---
2  ;; Time-stamp: <2005-01-08 12:52:29 deego>  ;; Time-stamp: <2005-07-05 11:04:18 deego>
3  ;; Copyright (C) 2002 D. Goel  ;; Copyright (C) 2002 D. Goel
4  ;; Emacs Lisp Archive entry  ;; Emacs Lisp Archive entry
5  ;; Filename: erbutils.el  ;; Filename: erbutils.el
# Line 530  should start at the beginning of b." Line 530  should start at the beginning of b."
530  (run-hooks 'erbutils-after-load-hooks)  (run-hooks 'erbutils-after-load-hooks)
531    
532    
533  (defun erbutils-remove-text-properties (text)  (defun erbutils-remove-text-properties (str)
534    (with-temp-buffer  ;;;   (with-temp-buffer
535      (insert text)  ;;;     (insert text)
536      (buffer-substring-no-properties (point-min) (point-max))))  ;;;     (buffer-substring-no-properties (point-min) (point-max))))
537      ;; fledermaus' code: avoid with-temp-buffer becuse of i8n problems.
538      (set-text-properties 0 (length str) nil str)
539      str)
540    
541    
542  (defun erbutils-defalias-i (ls &optional prefix prefix-rm  (defun erbutils-defalias-i (ls &optional prefix prefix-rm
543                                 functionpref)                                 functionpref)

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26