Hi Robert,
On Wed, Apr 03, 2013 at 10:05:57AM -0500, Robert Goldman wrote:
> On 4/3/13 Apr 3 -9:52 AM, Michael Strey wrote:
> > This gives me the opportunitie to publish my own attempt to implement
> > telephone functionality into org. I'm using Linphone
> > (http://www.linphone.org/) instead of Skype.
>
> Thanks! I am folding the linphone code in to make org-phone more generic.
Great!
> Question: why the removal of "(0)"? For international calls? Why "(0)" only,
> instead of any 0 prefix?
>
> Also, do you ever want to remove it anywhere but as a prefix?
> If so, maybe DELETE is the wrong function call.
Linphone requires the numbers in form 0033456833 or +33456833 respectively.
Usually my phone links look like [[tel:+49 351 4129535]]; but since I
imported data sets from a larger contact data base that had evolved over
time, I ended up with stuff like this in my data base:
1. [[tel:0033 (0) 4568-33]]
2. [[tel:+49 (0)3 8899 66]]
3. [[tel:0351 41295-35]]
4. [[tel:0351/4129535]]
5. [[tel:(0351) 412 95-35]]
My filter function currently handles the cases 1. to 4. but (for no
other reason than carelessness) not 5.
#+BEGIN_SRC emacs-lisp
(defun trim-phone-number (phonenumber)
"Remove whitespaces from a telephone number"
(setq trimmed_phonenumber
(mapconcat 'identity
(delete "(0)" (split-string phonenumber "[ /-]")) "")))
#+END_SRC
Regards
--
Michael Strey
www.strey.biz
